عايز عمل كلمة سر للتقارير في الفورم وباقي الملف مفتوح عادي

[كريم ناصف]

السلام عليكم اخواني المحترمين

الملف معمول علي فورمة ويوجد زرار للتقارير 

عايز كلمة سر او طريقة لاخفاء التقارير ومحدش يستعملها غير المدير

ولكم الاحترام والتقدير

BBBBB.xls

[نبيل عبد الهادي]

تفضل

تم وضع كلمة مرور "123" لتأكيد الدخول على هذا الاجراء  

iBox = Application.InputBox("ادخل كلمة المرور لهذا الاجراء", "تأكيد بكلمة المرور")
If iBox <> "123" Then Exit Sub  'تغير الباس من خلال هذا السطر

 

BBBBB.xls

[كريم ناصف]

استاذ نبيل

لك كل الشكر والتقدير علي الكود الجميل  وعاجز عن الشكر

وجزاء الله خيراااا