المساعدة في عمل باسورد لشيت بداخل ملف الاكسيل

[dah_med]

أخي عمر

هل يمكن وضع فورم به اسم المستخدم وكلمة مرور للورقة 2

بدل كلمة المرور فقط

[حمادة عمر]

السلام عليكم

الاخ الكريم / dah_med

بارك الله فيك

تفضل اخي طلبك

دخول الشيت عن طريق فورم به اسم مستخدم وكلمة مرور

اسم المستخدم للملف والفورم  : SAMA

كلمة المرور للملف والفورم   :  12345

 

ارجو ان يفي ذلك بطلبك

واي استفسار معك دائما باذن الله

تفبل خالص تحياتي

 

 

فتح شيت معين بفورم باسم مستخدم ورقم سري .rar

[قنديل الصياد]

[حمادة عمر]

السلام عليكم

الاخ الحبيب / قنديل الصياد

بارك الله فيك

تقبل خالص تحياتي

جزاك الله خيرا اخي الحبيب

[احمدزمان]

السلام عليكم و رحمة الله وبركاته

 

اخي حماده عمر

رائع جدا

وتمكن واضح

 

جزاك الله خيرا

[حمادة عمر]

السلام عليكم و رحمة الله وبركاته

 

اخي حماده عمر

رائع جدا

وتمكن واضح

 

جزاك الله خيرا

 

السلام عليكم

الاستاذ القدير / احمدزمان

بارك الله فيك

شهادة من استاذ مثلك تكفيني وتشجعني علي تقديم المزيد بكم ومعكم

لك مني ارق التحيات

تقبل خالص شكري وتقديري

[اسكندراني]

Private Sub Worksheet_Activate()
Cells.Columns.Hidden = True
Dim pas As String
pas = InputBox("Enter password", "password")
If pas = "123" Then
Cells.Columns.Hidden = False
MsgBox "WELCOME"
Else
MsgBox "GOOD BAY"
End If


End Sub

هذا كود بسيط لاخفاء الصفحه وفتحها بكلمه سر طبعا لا يجارى اكواد اساتذة المنتدي العريق ولكنه اجتهاد تلميذ يتعلم من هذا المنتدي الجميل 

معذرة الكود لا يخفي الصفحه بل محتوياتها فقط