Skip to main content

كيفية إدراج عدة خانات اختيار بسرعة في Excel؟

Author: Xiaoyang Last Modified: 2025-05-30

كيف يمكننا إدراج عدة خانات اختيار بسرعة في Excel؟ يرجى اتباع هذه الطرق الذكية في Excel:

إدراج عدة خانات اختيار باستخدام مقبض التعبئة

إدراج عدة خانات اختيار باستخدام كود VBA

إدراج وحذف عدة خانات اختيار بنقرة واحدة باستخدام Kutools لـ Excel


arrow blue right bubble إدراج عدة خانات اختيار باستخدام مقبض التعبئة

في Excel، يعتبر مقبض التعبئة وظيفة قوية للقيام بالعديد من الأشياء. يمكنه أيضًا ملء خانات الاختيار. أولاً، يجب عليك إدراج خانة اختيار. اتبع الخطوات التالية:

1. انقر على Developer في شريط القائمة، ثم انقر على Insert واختر صورة خانة الاختيار تحت Form Control. انظر إلى لقطة الشاشة:

click checkbox from Developer tab

2. انقر على صورة خانة الاختيار، وسترى مؤشر علامة الجمع، انقر حيث تريد إضافة خانة اختيار.

click where you want to add checkbox

3. حدد خانة الاختيار وحركها إلى خلية، ثم احذف اسم خانة الاختيار.

4. بعد ذلك، حدد الخلية التي توجد فيها خانة الاختيار. ثم اسحب مقبض التعبئة عبر نطاق الخلايا الذي تريد ملؤه. انظر إلى لقطة الشاشة:

drag the fill handle to fill the chekbox to other cells


إدراج عدة خانات اختيار في التحديدات بنقرة واحدة:

يمكن أن تساعدك أداة Batch Insert Check Boxes الخاصة بـ Kutools لـ Excel على إدراج عدة خانات اختيار بسرعة دفعة واحدة. انقر لتنزيل هذه الميزة مجانًا.

Insert multiple checkboxes by kutools

Kutools لـ Excel: مع أكثر من 300 إضافة مفيدة لـ Excel، يمكنك تجربتها مجانًا دون قيود لمدة 30 يومًا. قم بالتنزيل وجرّب الآن مجانًا!


arrow blue right bubble إدراج عدة خانات اختيار باستخدام كود VBA

إذا كنت تعتقد أن الطريقة الأولى مزعجة بعض الشيء، فإن الكود التالي لـ VBA يمكن أن يساعدك على إدراج عدة خانات اختيار بسهولة وسرعة.

1. انقر على Developer > Visual Basic، سيتم عرض نافذة جديدة Microsoft Visual Basic for applications، انقر على Insert > Module، وأدخل الكود التالي في الوحدة:

Sub InsertCheckBoxes()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Ws As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Ws = Application.ActiveSheet
Application.ScreenUpdating = False
For Each Rng In WorkRng
    With Ws.CheckBoxes.Add(Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        .Characters.Text = Rng.Value
    End With
Next
WorkRng.ClearContents
WorkRng.Select
Application.ScreenUpdating = True
End Sub

2. ثم انقر run button زر تشغيل الكود. ستظهر نافذة منبثقة لتذكيرك بتحديد نطاق من الخلايا التي تريد إدراج خانات الاختيار فيها. انظر إلى لقطة الشاشة:

vba code to select cells for inserting the checkboxes

3. وبعد ذلك انقر على OK، تم إدراج خانات الاختيار في النطاق بشكل مرتب وجميل. انظر إلى لقطة الشاشة:

the checkboxes have been inserted


arrow blue right bubble إدراج عدة خانات اختيار باستخدام Kutools لـ Excel

هنا، يمكنني أن أقدم لك طريقة سهلة ومريحة لإدراج عدة خانات اختيار - Kutools لـ Excel، باستخدام ميزته Batch Insert Check Box، يمكنك إدراج خانات الاختيار في خلايا فارغة أو خلايا تحتوي على بيانات.

Kutools لـ Excel يقدم أكثر من 300 ميزة متقدمة لتبسيط المهام المعقدة، مما يعزز الإبداع والكفاءة. بالتكامل مع قدرات الذكاء الاصطناعي، يقوم Kutools بأتمتة المهام بدقة، مما يجعل إدارة البيانات أمرًا سهلاً للغاية. معلومات تفصيلية عن Kutools لـ Excel... نسخة تجريبية مجانية...

بعد تثبيت Kutools لـ Excel، يرجى القيام بالخطوات التالية:

1. حدد نطاق من الخلايا التي تريد إدراج خانات الاختيار فيها.

2. انقر على Kutools > Insert > Batch Insert Check Boxes، انظر إلى لقطة الشاشة:

click Batch Insert Check Boxes feature of kutools

3. بعد ذلك، تم ملء الخلايا المحددة بخانات الاختيار كما هو موضح في لقطات الشاشة التالية:

إدراج خانات اختيار في خلايا فارغة إدراج خانات اختيار في خلايا البيانات
Insert checkboxes into blank cells dInsert checkboxes into data cells

نصائح. إذا كنت ترغب في حذف عدة خانات اختيار بسرعة، يرجى تجربة استخدام Delete Check Boxes الخاص بـ Kutools لـ Excel كما هو موضح في لقطة الشاشة التالية. جميع الوظائف متاحة بدون قيود لمدة 60 يومًا، يرجى تنزيل البرنامج وإجراء تجربة مجانية الآن.

delete checkboxes by kutools

Kutools لـ Excel: مع أكثر من 300 إضافة مفيدة لـ Excel، يمكنك تجربتها مجانًا دون قيود لمدة 30 يومًا. قم بالتنزيل وجرّب الآن مجانًا!


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

كيفية حذف عدة خانات اختيار بسرعة في Excel؟

أفضل أدوات الإنتاجية لمكتب العمل

🤖 Kutools AI Aide: أحدث ثورة في تحليل البيانات من خلال: التنفيذ الذكي |توليد الشيفرة |إنشاء الصيغ المخصصة |تحليل البيانات وتوليد الرسوم البيانية |استدعاء الوظائف المحسنة
الميزات الشائعة: البحث، تمييز أو وضع علامة على المكررات | حذف الصفوف الفارغة | دمج الأعمدة أو العنوان دون فقدان البيانات | تقريب ...
بحث متقدم: بحث V متعدد المعايير | بحث V متعدد القيم | بحث في عدة ورقات | مطابقة غامضة ....
قائمة منسدلة متقدمة: إنشاء قائمة منسدلة بسرعة | قائمة منسدلة تابعة | قائمة منسدلة متعددة الاختيار ....
إدارة الأعمدة: إضافة عدد محدد من الأعمدة | نقل الأعمدة | تبديل حالة إظهار الأعمدة المخفية | مقارنة النطاق والأعمدة ...
ميزات مميزة: التركيز على الشبكة | عرض التصميم | شريط الصيغ المحسن | أدوات المصنف & أدوات الورقة العمل | مكتبة النص التلقائي (Auto Text) | منتقي التاريخ | دمج البيانات | تشفير/فك تشفير الخلايا | إرسال البريد الإلكتروني حسب القائمة | مرشح متقدم | تصفية خاصة (تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
أفضل15 مجموعة أدوات:12 أداة نصية (إضافة نص، حذف الأحرف المحددة، ...) | أكثر من50 نوع من الرسوم البيانية (مخطط جانت، ...) | أكثر من40 صيغة عملية (حساب العمر بناءً على تاريخ الميلاد، ...) |19 أداة إدراج (إدراج رمز الاستجابة السريعة، إدراج صورة من المسار، ...) |12 أداة تحويل (تحويل إلى كلمات، تحويل العملة، ...) |7 أدوات دمج وتقسيم (دمج متقدم للصفوف، تقسيم الخلايا، ...) | ... والمزيد

عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...


Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير

  • تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
  • افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
  • يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!