بسم الله الرحمن الرحيم
كيفية حماية الخلايا التى تحتوى على معادلات
اهلا بكم متابعى موقع الاوفيس
اهلا بكم فى درس جديد من دروس اكسل vba
درس جديد نتعرف
فية على مهارة جديد من مهارات excel macro
وسنتعرف فى درس اليوم على كيفية حماية جميع الخلايا التى
تحتوى على معادلات فقط
مما لاشك فية اننا عندما نقوم بعمل مشروع معين بالاكسل
وهذا الملف يحتوى على معادلات وصيغ مهمة ويمكن ان يدخل المستخدم على هذة الصيغ
ويقوم باتلافها ووقف عملها فالباتالى لابد لنا ان نقوم بعمل كود ماكرو مهم لحماية
هذة الخلايا من العبث بها واتلافها من قبل المستخدمين
اذا حان الوقت لنعرف كيفية عمل مثل هذا الكود
ندخل على Developer
ونفتح محرر الاكواد visual basic
وندرج موديول جديد Insert module
وكتب فية الكود التالى
Sub lockCellsWithFormulas()
With ActiveSheet
.Unprotect
.Cells.Locked = False
.Cells.SpecialCells(xlCellTypeFormulas).Locked
= True
.Protect
AllowDeletingRows:=True
End With
End Sub
وفى هذا الكود نقوم بعمل حماية للخلايا التى تحتوى على
معادلات فقط