كيف يمكن قفل خلايا محددة في Excel دون حماية ورقة العمل بأكملها؟
عادةً، تحتاج إلى حماية ورقة العمل بأكملها لمنع تعديل خلية التحديد المُقفلة. لكن هل هناك طريقة لقفل التحديد دون حماية الورقة بالكامل؟ يقدّم هذا المقال حلاً باستخدام VBA.
قفل خلايا محددة دون حماية ورقة العمل بأكملها باستخدام VBA
قفل خلايا محددة دون حماية ورقة العمل بأكملها باستخدام VBA
إذا كنت بحاجة إلى قفل الخليتين A3 وA5 في ورقة العمل الحالية، فإن كود VBA التالي سيساعدك على تحقيق ذلك دون الحاجة إلى حماية ورقة العمل بأكملها.
1. انقر بزر الماوس الأيمن على لسان الورقة، ثم اخترعرض الكودمن قائمة النقر بزر الماوس الأيمن.
2. بعد ذلك، انسخ والصق كود VBA أدناه في نافذة الكود. راجع لقطة الشاشة التالية:
كود VBA: قفل خلايا محددة دون حماية ورقة العمل بأكملها
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
If Target.Row = 3 Or Target.Row = 5 Then
Beep
Cells(Target.Row, Target.Column).Offset(0, 1).Select
End If
End If
End Sub 
ملاحظة: في الكود، يشيرالعمود 1معالصف = 3والصف = 5إلى أن الخليتين A3 وA5 في ورقة العمل الحالية سيتم قفلهما بعد تشغيل الكود. يمكنك تعديلها حسب حاجتك.
3. اضغط على مفاتيحAlt + Q معًا لإغلاق نافذةمايكروسوفت Visual Basic for Applications.
الآن تم قفل الخليتين A3 وA5 في ورقة العمل الحالية. إذا حاولت تحديد إحداهما، فسيتم نقل المؤشر تلقائيًا إلى الخلية المجاورة على اليمين.
مقالات ذات صلة:
- كيف يمكن قفل جميع مراجع الخلايا في الصيغ دفعةً واحدة في Excel؟
- كيف يمكن قفل الخلايا أو حمايتها بعد إدخال البيانات في Excel؟
- كيف يمكن قفل أو إلغاء قفل نطاق محدد بناءً على القيمة الموجودة في خلية أخرى في Excel؟
- كيف تربط صورةً أو رسمًا بخلية في Excel أو تضعه داخلها؟
- كيف يمكن تثبيت عرض وارتفاع الخلية لمنع تغيير حجمها في Excel؟
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!
جميع الإضافات من Kutools في برنامج تثبيت واحد!
Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل