كيفية تمييز الخلية أو الصف باستخدام خانة اختيار في Excel؟

كما هو موضح في لقطة الشاشة أدناه، تحتاج إلى تمييز صف أو خلية باستخدام خانة اختيار. عندما يتم تحديد خانة الاختيار، سيتم تمييز صف أو خلية معينة تلقائيًا. ولكن كيف يمكنك تحقيق ذلك في Excel؟ سيوضح لك هذا المقال طريقتين لتحقيق ذلك.

تمييز الخلية أو الصف باستخدام خانة اختيار مع التنسيق الشرطي
تمييز الخلية أو الصف باستخدام خانة اختيار مع كود VBA

تمييز الخلية أو الصف باستخدام خانة اختيار مع التنسيق الشرطي

يمكنك إنشاء قاعدة تنسيق شرطي لتمييز الخلية أو الصف باستخدام خانة اختيار في Excel. يرجى القيام بما يلي.

الخطوة الأولى: ربط جميع خانات الاختيار بخلية محددة

1. تحتاج إلى إدراج خانات اختيار في الخلايا واحدة تلو الأخرى يدويًا عن طريق النقر على Developer > Insert > Check Box (Form Control).

2. الآن تم إدراج خانات الاختيار في الخلايا في العمود I. يرجى تحديد أول خانة اختيار في I1، وإدخال الصيغة =$J1 في شريط الصيغة، ثم الضغط على مفتاح Enter.

تلميح: إذا كنت لا تريد أن تكون القيم مرتبطة بالخلايا المجاورة لخانات الاختيار، يمكنك ربط خانة الاختيار بخلية في ورقة عمل أخرى مثل =Sheet3!$E1.

3. كرر الخطوة 1 حتى يتم ربط جميع خانات الاختيار بالخلايا المجاورة أو الخلايا في ورقة عمل أخرى.
ملاحظة: يجب أن تكون جميع الخلايا المرتبطة متتالية وموجودة في نفس العمود.

الخطوة الثانية: إنشاء قاعدة تنسيق شرطي

الآن تحتاج إلى إنشاء قاعدة تنسيق شرطي كما يلي خطوة بخطوة.

1. حدد الصفوف التي تحتاج إلى تمييزها باستخدام خانات الاختيار، ثم انقر على Conditional Formatting > New Rule تحت تبويب Home. انظر لقطة الشاشة:

2. في مربع الحوار New Formatting Rule، تحتاج إلى:

الآن تم إنشاء قاعدة التنسيق الشرطي. عند تحديد خانات الاختيار، سيتم تمييز الصفوف المقابلة تلقائيًا كما هو موضح في لقطة الشاشة أدناه.

تمييز الخلية أو الصف باستخدام خانة اختيار مع كود VBA

يمكن أن يساعدك الكود التالي VBA أيضًا في تمييز الخلية أو الصف باستخدام خانة اختيار في Excel. يرجى القيام بما يلي.

1. في ورقة العمل التي تحتاج إلى تمييز الخلية أو الصف باستخدام خانة اختيار. انقر بزر الماوس الأيمن على Tab Sheet وحدد View Code من قائمة النقر بزر الماوس الأيمن لفتح نافذة Microsoft Visual Basic for Applications.

2. ثم انسخ والصق الكود VBA أدناه في نافذة الكود.

كود VBA: تمييز الصف باستخدام خانة اختيار في Excel

Sub AddCheckBox()
Dim xCell As Range
Dim xRng As Range
Dim I As Integer
Dim xChk As CheckBox
On Error Resume Next
InputC:
    Set xRng = Application.InputBox("Please select the column range to insert checkboxes:", "Kutools for Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
If xRng.Columns.Count > 1 Then
    MsgBox "The selected range should be a single column", vbInformation, "Kutools fro Excel"
    GoTo InputC
Else
    If xRng.Columns.Count = 1 Then
        For Each xCell In xRng        
            With ActiveSheet.CheckBoxes.Add(xCell.Left, _
               xCell.Top, xCell.Width = 15, xCell.Height = 12)
               .LinkedCell = xCell.Offset(, 1).Address(External:=False)
               .Interior.ColorIndex = xlNone
               .Caption = ""
               .Name = "Check Box " & xCell.Row
            End With    
            xRng.Rows(xCell.Row).Interior.ColorIndex = xlNone                  
        Next        
    End If    
    With xRng    
     .Rows.RowHeight = 16    
    End With   
    xRng.ColumnWidth = 5#    
    xRng.Cells(1, 1).Offset(0, 1).Select    
    For Each xChk In ActiveSheet.CheckBoxes   
      xChk.OnAction = ActiveSheet.Name + ".InsertBgColor"      
    Next
End If
End Sub

Sub InsertBgColor()
Dim xName As Integer
Dim xChk As CheckBox
For Each xChk In ActiveSheet.CheckBoxes 
  xName = Right(xChk.Name, Len(xChk.Name) - 10) 
  If (xName = Range(xChk.LinkedCell).Row) Then   
   If (Range(xChk.LinkedCell) = "True") Then   
    Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = 6    
   Else    
    Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = xlNone  
   End If  
  End If
Next
End Sub

3. اضغط على مفتاح F5 لتشغيل الكود. (ملاحظة: يجب وضع المؤشر في الجزء الأول من الكود لتطبيق مفتاح F5) في مربع الحوار المنبثق Kutools لـ Excel، يرجى تحديد النطاق الذي تريد إدراج خانات الاختيار فيه، ثم انقر على زر OK. هنا أختار النطاق I1:I6. انظر لقطة الشاشة:

4. ثم يتم إدراج خانات الاختيار في الخلايا المحددة. تحقق من أي واحدة من خانات الاختيار، سيتم تمييز الصف المقابل تلقائيًا كما هو موضح في لقطة الشاشة أدناه.

مقالات ذات صلة:

• كيفية تغيير قيمة خلية محددة أو لونها عند تحديد خانة اختيار في Excel؟
• كيفية إدراج طابع تاريخ في خلية إذا تم تحديد خانة اختيار في Excel؟
• كيفية جعل خانة الاختيار محددة بناءً على قيمة الخلية في Excel؟
• كيفية تصفية البيانات بناءً على خانة اختيار في Excel؟
• كيفية إخفاء خانة اختيار عند إخفاء الصف في Excel؟
• كيفية إنشاء قائمة منسدلة مع خانات اختيار متعددة في Excel؟