كيف يمكن طباعة جميع الخيارات المتوفرة في قائمة منسدلة في Excel؟

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

طباعة جميع الخيارات في قائمة منسدلة باستخدام كود VBA

إذا كانت قائمتك المنسدلة مبنية على التحقق من صحة البيانات أو عنصر تحكم نموذج، وترغب في طباعة كل خيار تلقائيًا كطباعة منفصلة (مثلاً، لرؤية شكل ورقة العمل بعد تحديد كل خيار)، فإن استخدام VBA يُعد الطريقة الأكثر كفاءة. ويكون هذا مفيدًا بشكل خاص عندما تعتمد بياناتك أو حساباتك على اختيار القائمة المنسدلة، وتحتاج إلى نسخة ورقية لكل سيناريو ممكن. يرجى اتباع الخطوات التالية بعناية لتجنب المشكلات الشائعة:

1. اضغط على مفاتيحAlt+F11 لفتح نافذةMicrosoft Visual Basic for Applications. إذا لم تعمل مجموعة المفاتيح هذه، فتأكد من تفعيل اختصارات لوحة المفاتيح وأن مكون VBA مثبَّت في تثبيت Office الخاص بك.

2. في نافذةMicrosoft Visual Basic for Applications، انقر فوقإدراج > وحدة برمجية (Module). ثم انسخ والصق كود VBA أدناه في نافذة الوحدة البرمجية المفتوحة. راجع لقطة الشاشة:

كود VBA: طباعة جميع الخيارات في قائمة منسدلة محددة كطباعات منفصلة

Sub Iterate_Through_data_Validation()
    Dim xRg As Range
    Dim xCell As Range
    Dim xRgVList As Range
    Set xRg = Worksheets("Sheet1").Range("B8")
    Set xRgVList = Evaluate(xRg.Validation.Formula1)
    For Each xCell In xRgVList
        xRg = xCell.Value
        ActiveSheet.PrintOut
    Next
End Sub

ملاحظة: في الكود، تم تعيينSheet1 كاسم ورقة العمل التي تحتوي على القائمة المنسدلة التي تريد طباعتها، وB8 هي الخلية التي تحتوي على القائمة المنسدلة. تأكد من استبدال هذه القيم بأسماء الأوراق والمراجع الفعلية الخاصة بك، إذ قد تؤدي المراجع غير الصحيحة إلى أخطاء أو نتائج غير مرغوبة.

3. بعد إدخال الكود، اضغط على مفتاحF5 أو انقر فوق زرتشغيل (Run)لتنفيذ ماكرو البرنامج. سيقوم الماكرو بمرور كل قيمة في القائمة المنسدلة، وتحديث الخلية المحددة وفقًا لذلك، ثم إرسال طباعة منفصلة لكل إدخال. قد تستغرق العملية بعض الوقت إذا كانت القائمة تحتوي على العديد من الخيارات، وستُطبَّق إعدادات الطابعة الخاصة بك—مثل الطابعة الافتراضية وعدد النسخ—تلقائيًا.

إذا واجهت أخطاءً مثل «Subscript out of range» أو تم تحديث خلية غير صحيحة، فتأكد من جديد من اسم الورقة وموقع الخلية التي تحتوي على القائمة المنسدلة، وتحقق من أن نوع القائمة المنسدلة متوافق (سواء كان التحقق من صحة البيانات أو عنصر تحكم نموذج).

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

طباعة جميع الخيارات عن طريق عرض البيانات الأصلية القائمة المنسدلة مباشرةً

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

السيناريوهات المناسبة:هذه الطريقة مثالية إذا كانت قائمتك منسدلة وتستخدم نطاق خلايا كمصدرٍ للبيانات، أو إذا اعتمدت على قائمة واضحة مفصولة بفواصل في مربع حوار التحقق من صحة البيانات. كما أنها وسيلة عملية لتزويد أعضاء الفريق أو أصحاب المصلحة بقائمة مرجعية بالخيارات بسرعة.

المزايا:لا حاجة إلى الماكرو، وخطر أقل عند إنشاء طباعات متعددة، وتنفيذ فوري إذا كانت قائمة المصدر منظمة جيدًا.

القيود:لن تُعيد هذه الطريقة إنشاء تأثير ورقة العمل بالكامل مع كل خيار محدد، بل ستُطبع فقط قائمة القيم الممكنة.

الخطوات:

✓إذا كانت قائمتك المنسدلة مبنية على نطاق خلايا (مثل وجود الخيارات في A1:A10):

• انتقل إلى ورقة العمل وحدد النطاق المُستخدم كمصدر للقائمة المنسدلة، والذي يُعيَّن عادةً ضمن «التحقق من صحة البيانات» — ويمكنك العثور عليه في: بيانات > التحقق من صحة البيانات > حقل المصدر.
• حدد نطاق المصدر بالكامل (مثل A1:A10) باستخدام الماوس.
• اضغطCtrl+P أو انتقل إلىملف > طباعة.
• في إعدادات الطباعة، تأكد من تحديد خيار «طباعة التحديد» إذا كنت ترغب في طباعة القائمة فقط دون باقي الورقة.
• تحقق من معاينة الطباعة للتأكد من أن تحديدك يظهر بالشكل المطلوب، ثم اطبع القائمة.

✓إذا كانت قائمتك المنسدلة تستخدم قائمة مدخلة يدويًا (مثل "تفاحة،موزة،برتقال"):

• في ورقة العمل الخاصة بك، اختر عمودًا فارغًا وأدخل العناصر واحدة تلو الأخرى، بحيث يكون كل عنصر في صف مستقل (مثل إدخال «تفاحة» في الخلية B1، و«موزة» في B2، وهكذا).
• بدلاً من ذلك، استخدم مربع حوار التحقق من صحة البيانات لعرض القائمة، ثم انقلها من حقل المصدر والصقها كقيم في عمود.
• بمجرد أن تصبح القائمة بأكملها في العمود، اتبع الخطوات المذكورة أعلاه لطباعة التحديد.

نص إضافي:إذا كانت لديك قائمة طويلة مفصولة بفواصل وترغب في تقسيمها إلى خلايا منفصلة لتسهيل الطباعة، يمكنك استخدام ميزة «تحويل النص إلى أعمدة» الموجودة تحتبيانات > تحويل النص إلى أعمدة، باستخدام الفاصلة كمحدد.

تُعد هذه الطريقة اليدوية أكثر كفاءة للقوائم الثابتة ذات الطول القصير إلى المتوسط. أما إذا كانت قائمتك تتغير غالبًا أو احتجتَ بشكل متكرر إلى طباعة ورقة العمل مع كل خيار محدد، ففكّر في أتمتة العملية باستخدام VBA كما ورد سابقًا.

استكشاف الأخطاء ونصائح إضافية:

• إذا كان مصدر القائمة المنسدلة موجودًا في ورقة عمل أخرى أو مخفيًا، فقد تحتاج إلى إظهار الأوراق المخفية أو التحقق من الصيغ التي تُنشئ النطاقات الديناميكية.
• تحقق دائمًا من الطابعة المُعدة للاستخدام عبر معاينة الطباعة، خاصةً قبل تشغيل أي كود VBA قد يؤدي إلى طباعة متعددة.
• بالنسبة إلى قوائم الخيارات المنسدلة المعتمدة على الصيغ (مثل مصادر المصفوفات الديناميكية)، يُوصى بنسخ العناصر المرئية الحالية ولصقها في عمود جديد لتسهيل الطباعة.
• تذكّر أن طباعة القوائم الطويلة قد تستهلك كميات كبيرة من الورق والحبر. لذا، راجع معاينة الطباعة لتجنب الهدر، وقم بتعديل الإعدادات حسب الحاجة.
• إذا لم تكن بحاجة إلى الطباعة المباشرة وترغب فقط في تصدير القائمة، يمكنك نسخها ولصقها في تطبيق آخر (مثل Word أو Notepad) لتنسيقها أو مشاركتها بطريقة مختلفة.

اقتراح ختامي:للمستخدمين الذين يحتاجون إلى طباعة خيارات القوائم المنسدلة بشكل متكرر، نوصي بإنشاء قائمة مصدر مخصصة في منطقة مُسماة بوضوح داخل المصنف عند الحفظ. وإذا كنت غالبًا ما تحتاج إلى طباعة ورقة العمل لكل سيناريو، فاحرص على تحديث ماكرو VBA الخاص بك والتحقق من جميع المراجع قبل التشغيل. ولا تنسَ مراجعة مصادر القوائم المنسدلة بانتظام—خاصةً بعد إجراء أي تغييرات أو تحديثات على المصنف—لضمان الدقة والاستخدام السلس المستمر.

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

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

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

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

استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية و40+ لغات أخرى!

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

مزيد من التفاصيل حول Kutools لـ Excel...تنزيل مجاني...

---

يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير

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

مزيد من التفاصيل حول Office Tab...تنزيل مجاني...

---

جميع الإضافات من Kutools في برنامج تثبيت واحد!

Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.

• حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
• برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
• يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
• تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
• أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل

مزيد من التفاصيل حول Kutools for Office...تنزيل مجاني...