كيفية ربط خانات الاختيار بعدة خلايا في 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؟
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد