كيفية تغيير قيمة الخلية أو اللون المحدد عند تحديد خانة الاختيار في إكسيل؟
تتحدث هذه المقالة عن تغيير قيمة أو لون خلية محددة بواسطة مربع اختيار. على سبيل المثال ، عند تحديد خانة اختيار معينة ، سيتم تغيير القيمة أو لون الخلفية لخلية محددة تلقائيًا. يرجى اتباع الطرق التالية خطوة بخطوة للتعامل معها.
قم بتغيير قيمة خلية محددة عند تحديد خانة الاختيار باستخدام الصيغة
قم بتغيير قيمة خلية محددة عند تحديد خانة الاختيار برمز VBA
قم بتغيير لون الخلية المحدد عند تحديد خانة الاختيار برمز VBA
قم بتغيير قيمة خلية محددة عند تحديد خانة الاختيار باستخدام الصيغة
لنفترض أنك بحاجة إلى ملء الخلية A1 بالقيمة "اختبار" عند تحديد خانة الاختيار 1. وإفراغ الخلية عند إلغاء تحديد خانة الاختيار. الرجاء القيام بما يلي.
تحتاج إلى ربط خانة الاختيار بخلية معينة أولاً ، ثم تطبيق الصيغة لتحقيق ذلك.
1. لربط خانة الاختيار بخلية معينة ، يرجى تحديدها ، ثم إدخال = مرجع الخلية في شريط الصيغة واضغط على مفتاح الإدخال. هنا أقوم بربط مربع الاختيار 1 بالخلية C2 بإدخال = C2 في شريط الصيغة بعد تحديد خانة الاختيار.
لخانة الاختيار ActiveX Control ، يرجى النقر بزر الماوس الأيمن عليها وتحديدها عقارات من قائمة النقر بزر الماوس الأيمن. وفي عقارات في مربع الحوار ، أدخل الخلية المرتبطة في ملف لينكدسل ، ثم أغلق مربع الحوار. انظر لقطة الشاشة:
2. حدد الخلية التي تريد تغيير قيمتها (هنا أحدد A1) ، ثم أدخل الصيغة = IF (C2، "Test"، "") في شريط الصيغة ، واضغط على أدخل مفتاح. انظر لقطة الشاشة:
ملاحظات: في الصيغة ، C2 هي الخلية المرتبطة في خانة الاختيار 1 ، "اختبار" هي القيمة التي تحتاج إلى عرضها في الخلية A1 عند تحديد خانة الاختيار.
يمكنك رؤية النتائج كما هو موضح أدناه لقطات الشاشة بعد تحديد أو إلغاء تحديد خانة الاختيار المقابلة.
قم بتغيير قيمة خلية محددة عند تحديد خانة الاختيار برمز VBA
يمكنك أيضًا تغيير قيمة خلية محددة عند تحديد خانة الاختيار برمز VBA. الرجاء القيام بما يلي.
1. انقر بزر الماوس الأيمن فوق علامة تبويب الورقة مع قيمة الخلية التي تريد تغييرها بناءً على خانة الاختيار ، ثم انقر فوق عرض الرمز من قائمة النقر بزر الماوس الأيمن.
2. في ال ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، يرجى نسخ ولصق رمز فبا أدناه في رمز نافذة.
كود فبا: قم بتغيير قيمة خلية محددة عند تحديد خانة الاختيار
Private Sub CheckBox1_Click()
Dim xRng As Range
Dim xCell As Range, xStr As String
Set xRng = Selection
If CheckBox1.Value = True Then
xStr = InputBox("Please enter a value:", "Kutools for Excel")
xRng.Value = xStr
If xStr = "" Then CheckBox1.Value = False
Else
xRng.Value = ""
End If
End Sub
ملاحظات: في الكود ، ChekBox1 هو اسم خانة الاختيار (عناصر تحكم ActiveX). يمكنك تغييره كما تريد.
3. اضغط على قديم + Q مفاتيح في نفس الوقت لإغلاق ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
4. حدد خلية فارغة (A1) تريد تغيير قيمتها بناءً على خانة الاختيار ، وحدد خانة الاختيار 1 في ورقة العمل الخاصة بك. الآن أ كوتولس ل إكسيل ينبثق مربع الحوار ، يرجى إدخال القيمة التي تريد أن يتم ملؤها في الخلية الفارغة المحددة ، ثم انقر فوق OK زر. انظر لقطة الشاشة:
ثم يتم عرض القيمة المحددة في الخلية المحددة على الفور. وعند إلغاء تحديد خانة الاختيار ، ستكون الخلية فارغة.
ملاحظات: سيذكرك هذا الرمز بإدخال قيمة النص بشكل دائري عند تحديد خانة الاختيار في كل مرة.
قم بتغيير لون الخلية المحدد عند تحديد خانة الاختيار برمز VBA
سيوضح لك هذا القسم كيفية تغيير لون الخلية المحدد عند تحديد خانة الاختيار برمز VBA.
1. انقر بزر الماوس الأيمن فوق علامة تبويب الورقة بلون الخلية الذي تريد تغييره بناءً على مربع الاختيار ، ثم انقر فوق عرض الرمز من قائمة النقر بزر الماوس الأيمن.
2. في ال ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، يرجى نسخ ولصق رمز فبا أدناه في نافذة التعليمات البرمجية.
كود فبا: قم بتغيير لون الخلية المحدد عند تحديد خانة الاختيار
Sub CheckBox1_Click()
Dim xRng As Range
Set xRng = Selection
If CheckBox1.Value = True Then
xRng.Interior.Color = vbRed
Else
xRng.Interior.Color = xlNone
End If
End Sub
ملاحظات: في الكود ، ChekBox1 هو اسم خانة الاختيار (عناصر تحكم ActiveX). يمكنك تغييره كما تريد.
3. حدد خلية تريد تغيير لون خلفيتها ، ثم حدد خانة الاختيار. يمكنك أن ترى أن لون التعبئة للخلية المحددة قد تغير إلى اللون الأحمر. وسيتم ملء الخلية المحددة بدون لون خلفية بعد إلغاء تحديد خانة الاختيار. انظر لقطات الشاشة:
مقالات ذات صلة:
- كيفية تمييز الخلية أو الصف مع خانة الاختيار في إكسيل؟
- كيفية إدراج طابع التاريخ في خلية إذا حددت خانة اختيار في إكسيل؟
- كيفية جعل مربع الاختيار محددًا بناءً على قيمة الخلية في Excel؟
- كيفية تصفية البيانات على أساس خانة الاختيار في إكسيل؟
- كيفية إخفاء مربع الاختيار عندما يكون الصف مخفيًا في Excel؟
- كيفية إنشاء قائمة منسدلة مع مربعات اختيار متعددة في إكسيل؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!