JavaScript is not enabled!...Please enable javascript in your browser

جافا سكريبت غير ممكن! ... الرجاء تفعيل الجافا سكريبت في متصفحك.

-->
الصفحة الرئيسية

كيفية حماية الخلايا التى تحتوى على معادلات Protect all the Cells With Formulas

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

كيفية حماية الخلايا التى تحتوى على معادلات


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

اهلا بكم فى درس جديد من دروس اكسل 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

وفى هذا الكود نقوم بعمل حماية للخلايا التى تحتوى على معادلات فقط

الاسمبريد إلكترونيرسالة