إخفاء المعادلات عن طريق حماية ورقة العمل Hide Formulas By Sheet Protection

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

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

2- كليك يمين على الخلايا ثم اختر الأمر تنسيق خلايا Format Cells ثم انتقل للتبويب Protection ، وأزل علامة الصح بجانب الخيار Locked أي إذا كانت مظللة قم بإزالة التظليل ثم إزالة علامة الصح ، بحيث يكون مربع الاختيار فارغ

3- حدد الخلايا المراد عمل حماية لها ، والتي تحتوي على المعادلات المراد حمايتها ، ثم كليك يمين عليها واختر تنسيق خلايا Format Cells وانتقل للتبويب Protection وضع علامة صح بجانب الخيار Locked

4- قم بحماية ورقة العمل من خلال التبويب Review ثم انقر الأمر Protect Sheet ثم OK (يمكنك وضع كلمة سر لورقة العمل)

5- قم بوضع الكود التالي في حدث المصنف لتتم الحماية عن طريق عدم تمكين المستخدم من اختيار أو تحديد الخلية المحمية

Private Sub Workbook_Open()
    Sheets("Sheet1").EnableSelection = xlUnlockedCells
End Sub

تحميل الملف من هنا

إعداد / ياسر خليل أبو البراء