-->

اكسل : كيفية عمل باسورد لتنفيذ الماكرو How To Make Password For Excel Macro VBA

بسم الله الرحمن الرحيم


اهلا بكم متابعى موقع ومدونة عالم الاوفيس

سؤال ورد الينا من احد الاصدقاء عن  كيفية عمل باسورد لزر تنفيذ الماكر و ؟

الاجابة بسيطة جد ان شاء الله 

لنفرض ان حضرتك تملك ملف معين وعندك مجموعة من المستخدمين يعملون على هذا الملف وتريد ان تحفظ الماكرو الخاص بك او الاكواد من العبث كيف لى ان اصنع باسورد على زر معين 

الاجابة من خلال الكود التالى 


Sub show_worksheet()
Dim password As String, x As Long
password = "1234"
If Application.InputBox("inter password", "login") <> password Then
MsgBox "worng password", vbInformation, "error"

Exit Sub
End If

Sheet2.Activate
End Sub

ولمتابعة اكثر عن الكود يرجى مشاهدة شرح الفيديو

Emad ghazi
كاتب المقالة
كاتب ومحرر اخبار اعمل في موقع عالم الاوفيس .

جديد قسم : اكسل متقدم

  1. السلام عليكم
    اخ عماد غازى الكريم
    شكرا جزيلا على جهودك، جزاك الله عنا بالخير
    اخي عماد حاولت تحميل الملفات المرفقه مع الدروس ولم استطع ارجو مساعدتك
    1. دورة VBA Excel للمبتدئين
    2. دورة اليوزرفورم
    ولك جزيل الشكر

    ردحذف
  2. ان شاء الله سوف نعدل الروابط كلها الى الميديا فاير ولكن الموضوع بياخد وقت نظرا لكثرة ملفات العمل

    ردحذف
    الردود
    1. السلام عليكم
      شكرا على ردك اخي عماد
      اقتراح
      ضع ملفات العمل في ملف مضغوط واحد وانشره بفيديو خاص على القناة في اليوتيوب
      وشكرا

      حذف
  3. تشكر اخي على كل الاعمال
    وخاصة كيفية حماية ملف اكسال بكلمة مرور

    ردحذف