اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

كيف يمكن منع ظهور بعض أو كل الMacros فى القائمة


triste

الردود الموصى بها

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

الأخوة الكرام :

لدى كتاب عمل قمت بعمل مجموعة من ال Macros له - مستفيداً من الكنوز الثمينة الموجودة بالمنتدى هنا - ، و يمكن استعراضها جميعاً - و من ثم التعامل معها - ببساطة من :

Tools

Macros

فتظهر القائمة ، و بإستخدام الأمر Run يتم تنفيذ أى Macro منها

و نظراً لإن إثنان من هذه ال Macros خاصين بتفعيل / إزالة الحماية عن جميع الأوراق فى كتاب العمل (و عددها يفوق المائة) دفعة واحدة،فإنه بإمكان أى مستخدم إزالة الحماية و التعديل كما يشاء فى أوراق العمل دون أن يزعج نفسه بفك حماية الأوراق كل على حدة بالطريق التقليدى من :

Tools

Protection

Unprotect Worksheet

و أنا لا أريد أن يحدث ذلك - بطبيعة الحال- و إنما أريد أن يحتاج المستخدم إدخال كلمة السر حتى يستطيع التعامل مع هذه ال Macros حتى لا يستطيع إزالة الحماية إلا بمعرفته لكلمة السر

فكيف يمكن عمل ذلك بارك الله فيكم ؟؟

رابط هذا التعليق
شارك

السلام عليكم

اخى العزيز :

اذهب الى صفحه Vb باستخدام Alt+F11

Tools

VBAProject Propperties

Protection

علم امام Lock Project Lock Project For viewing

ادخل كلمه السر التى تريدها

OK

اتمنى انك ماتكنش زعلان

السلام عليكم

رابط هذا التعليق
شارك

لا طبعاً ، أخى الكريم

فكلنا أخوة ، (و ربنا ما يجيبش زعل) ، و شكراً على ردك الكريم ، و توضيحك.

و ما كنت أقصده ليس منع الإطلاع على صيغة (الموديول نفسه) كما تفضلت فى ردك الكريم ، و لكن منع تنفيذ الماكرو نفسه ، و قد وصلت إليها بعد عناء البحث :) فى مشاركة لأحد الإخوة - بارك الله فيه - بواسطة كود يتم كتابته بعد إسم الماكرو مباشرةً . و أصبح تنفيذ الماكرو الآن يعتمد على إدخال كلمة السر كى يتم التنفيذ . و اعذرنى إن كنت غير دقيق فى استخدامى للمصطلحات مثل (الماكرو و الموديول ) فى غير مواضعها كما يجب ، فلا زلت لم أتمكن بعد من هذه الأمور .

و هذا هو رابط الموضوع (لاحظ الجزء الثانى منه تحديداً )

http://www.officena.net/ib/index.php?showtopic=1492&hl=

تم تعديل بواسطه triste
رابط هذا التعليق
شارك

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information