كود لاخفاء المعادلات

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

السلام عليكم أيها الإخوة الكرام

 

 

الكود يعمل ولكن بإمكان أي شخص أن يرى المعادلات........والمطلوب هل يوجد كود لإخفاء الأزرار ولا تظهر إلا بكلمة مرور

اخى العزيز

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

[fares58]

السلام عليكم

 

هذا الكود كذلك يعمل ولكن بانلقر على الزر مرات متعددة تظهر المعادلة ثم تغيب وبإمكان أي شخص التعرف على المعالة

 

Private Sub Worksheet_Selectionchange(ByVal Target As Range)
If Target.HasFormula = True Then ActiveCell.Offset(0, 1).Select
End Sub

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

اخى العزيز

مشاركة الاستاذ / Adel.Hanafy

ترد على تساؤلك وهذا الملف مرفق فى المشاركة

 

 

 

حمايه.rar

تم تعديل يناير 7, 2014 بواسطه قنديل الصياد

[fares58]

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

 

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

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

قم بتحديد كامل الورقة كما فى الصورة التالية

تحياتي

[فراس قاسم]

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