أقوم بإعداد جدول بيانات لتوجيه البيانات للاختبار التحليلي للمنتجات الكيميائية. أرغب في قفل كل سطر من البيانات بمجرد التحقق من نسخ البيانات المذكورة بواسطة المراجع. أنا قادر على قفل سطر واحد باستخدام هذا الرمز في VBA:
ورقة عمل فرعية خاصة تغيير (هدف ByVal كنطاق)
إذا كان النطاق ("X3") = "لا" إذن
النطاق("B3:W3").مقفل = خطأ
ElseIf Range("X3") = "Yes" إذن
النطاق("B3:W3").مقفل = صحيح
إنهاء حالة
نهاية الفرعية
يحتوي العمود X على قائمة منسدلة تحتوي على "نعم" و"لا" كخيارين. أرغب في قفل كل سطر من البيانات، عند إضافته إلى الورقة، بمجرد قيام المراجع بتحديد نعم في هذا العمود للتأكد من عدم إجراء تغييرات غير مقصودة على البيانات السابقة. هل هذا ممكن دون الحاجة إلى تكرار الكود لكل سطر إلى أجل غير مسمى؟
ورقة عمل فرعية خاصة تغيير (هدف ByVal كنطاق)
إذا كان النطاق ("X3") = "لا" إذن
النطاق("B3:W3").مقفل = خطأ
ElseIf Range("X3") = "Yes" إذن
النطاق("B3:W3").مقفل = صحيح
إنهاء حالة
نهاية الفرعية
يحتوي العمود X على قائمة منسدلة تحتوي على "نعم" و"لا" كخيارين. أرغب في قفل كل سطر من البيانات، عند إضافته إلى الورقة، بمجرد قيام المراجع بتحديد نعم في هذا العمود للتأكد من عدم إجراء تغييرات غير مقصودة على البيانات السابقة. هل هذا ممكن دون الحاجة إلى تكرار الكود لكل سطر إلى أجل غير مسمى؟