كيفية ربط خانات الاختيار بعدة خلايا في Excel؟
قد يساعدك ربط خانات الاختيار بعدة خلايا ذات صلة على إجراء العمليات الحسابية بسرعة وسهولة عندما تحتاج إلى جمع أو عد أو حساب متوسط الخلايا المحددة فقط أو غير المحددة. ولكن هل سبق لك أن حاولت ربط خانات الاختيار بعدة خلايا دفعة واحدة في ورقة العمل؟
ربط خانات الاختيار بعدة خلايا باستخدام صيغة واحدة تلو الأخرى
ربط خانات الاختيار بعدة خلايا دفعة واحدة باستخدام كود VBA
ربط خانات الاختيار بعدة خلايا باستخدام صيغة واحدة تلو الأخرى
لربط خانة الاختيار بخلية معينة، يمكنك في الواقع تطبيق صيغة بسيطة لربطها يدويًا.
1. بعد إدراج خانات الاختيار في ورقة العمل الخاصة بك، لتحديد خانة الاختيار، يرجى الضغط على مفتاح Ctrl ثم النقر فوق أول خانة اختيار تريد ربطها بخلية أخرى.
2. ثم في شريط الصيغة، اكتب علامة التساوي =، وبعد ذلك انقر فوق الخلية التي تريد ربط خانة الاختيار بها، B2 على سبيل المثال، انظر إلى لقطة الشاشة:
3. وبعد ذلك اضغط على مفتاح Enter على لوحة المفاتيح، الآن عند تحديد هذه الخانة، ستعرض الخلية المرتبطة نعم، وإذا قمت بإلغاء تحديدها، ستعرض لا، انظر إلى لقطة الشاشة:
4. كرر الخطوات أعلاه لربط خانات الاختيار الأخرى واحدة تلو الأخرى.

اكتشف سحر Excel مع Kutools AI
- التنفيذ الذكي: قم بعمليات الخلية، وتحليل البيانات، وإنشاء المخططات - كل ذلك يتم من خلال أوامر بسيطة.
- الصيغ المخصصة: قم بإنشاء صيغ مصممة خصيصًا لتسهيل سير عملك.
- برمجة VBA: كتابة وتطبيق أكواد VBA بسهولة.
- تفسير الصيغ: فهم الصيغ المعقدة بسهولة.
- ترجمة النصوص: تجاوز الحواجز اللغوية داخل جداول البيانات الخاصة بك.
ربط خانات الاختيار بعدة خلايا دفعة واحدة باستخدام كود VBA
إذا كانت هناك مئات أو آلاف من خانات الاختيار التي تحتاج إلى ربطها بخلايا أخرى، فإن الطريقة الأولى لن تكون فعالة، لربطها بعدة خلايا دفعة واحدة، يمكنك تطبيق الكود التالي لـ VBA. الرجاء القيام بما يلي:
1. انتقل إلى ورقة العمل الخاصة بك التي تحتوي على قائمة خانات الاختيار.
2. اضغط باستمرار على مفتاحي ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.
3. انقر فوق إدراج > وحدة، والصق الكود التالي في نافذة الوحدة.
كود VBA: ربط خانات الاختيار بعدة خلايا دفعة واحدة
Sub LinkChecks()
'Update by Extendoffice
Dim xCB
Dim xCChar
i = 2
xCChar = "B"
For Each xCB In ActiveSheet.CheckBoxes
If xCB.Value = 1 Then
Cells(i, xCChar).Value = True
Else
Cells(i, xCChar).Value = False
End If
xCB.LinkedCell = Cells(i, xCChar).Address
i = i + 1
Next xCB
End Sub
4. وبعد ذلك اضغط على مفتاح F5 لتشغيل هذا الكود، جميع خانات الاختيار في ورقة العمل النشطة تم ربطها بالخلايا، عند تحديد خانة الاختيار، سيتم عرض نعم في الخلية المرتبطة، إذا قمت بإلغاء تحديد خانة الاختيار، يجب أن تعرض الخلية المرتبطة لا، انظر إلى لقطة الشاشة:
ملاحظة: في الكود أعلاه، i = 2، الرقم 2 هو الصف الأول الذي تبدأ منه خانات الاختيار، والحروف B هي موقع العمود الذي تحتاج إلى ربط خانات الاختيار به. يمكنك تغييرها حسب حاجتك.
مقالات ذات صلة:
كيفية تحديد جميع خانات الاختيار باستخدام خانة اختيار واحدة في Excel؟
كيفية إدراج عدة خانات اختيار بسرعة في Excel؟
كيفية حذف عدة خانات اختيار بسرعة في Excel؟
أفضل أدوات زيادة الإنتاجية لمجموعة Office
عزز مهاراتك في Excel مع Kutools لـ Excel، وتمتع بكفاءة غير مسبوقة. يقدم Kutools لـ Excel أكثر من300 ميزة متقدمة لتعزيز الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يجلب تجربة التبويبات إلى Office، ويجعل عملك أسهل بكثير
- فعّل تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint
- افتح وأنشئ مستندات متعددة في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ جديدة.
- يمنحك زيادة إنتاجية تصل إلى50% ويوفر عليك مئات النقرات يومياً!