كيفية إنشاء قوائم منسدلة تابعة في مستند Word؟
كما هو موضح في لقطة الشاشة اليسرى ، فأنت بحاجة إلى تقييد الخيارات في القائمة المنسدلة الثانية بناءً على الخيار الموجود في القائمة المنسدلة الأولى ، كيف يمكنك القيام بذلك؟ ستعرض لك هذه المقالة طريقة لإنشاء قوائم منسدلة تابعة في مستند Word.
أنشئ قوائم منسدلة تابعة في Word برمز VBA
يمكن أن يساعدك رمز VBA أدناه في إنشاء قائمة منسدلة تابعة في مستند Word. يرجى اتباع التعليمات خطوة بخطوة.
1. أولاً ، تحتاج إلى إدراج قائمتين منسدلتين في مستند Word الخاص بك. انقر المطور > أشكال الإرث > حقل نموذج منسدل. انظر لقطة الشاشة:
2. انقر بزر الماوس الأيمن فوق القائمة المنسدلة الأولى (يجب أن تكون هذه القائمة المنسدلة هي القائمة الرئيسية) ، ثم انقر فوق خصائص. انظر لقطة الشاشة:
3. في الافتتاح خيارات حقل النموذج المنسدلة مربع الحوار ، تحتاج إلى:
3.1 أدخل الفئة في عنصر القائمة المنسدلة ثم انقر فوق أضف الزر ، كرر العملية حتى تتم إضافة جميع الفئات إلى العناصر الموجودة في مربع القائمة المنسدلة.
3.2 أدخل com.ddfood في حفظ مربع.
شنومك انقر فوق OK زر. انظر لقطة الشاشة:
4. انقر بزر الماوس الأيمن فوق القائمة المنسدلة الثانية ، ثم انقر فوق عقارات لفتحه خيارات حقل النموذج المنسدلة مربع الحوار ، وفي مربع الحوار ، أدخل فئة dd في حفظ مربع وانقر فوق OK زر. انظر لقطة الشاشة:
5. اضغط على قديم + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
6. في ال ميكروسوفت فيسوال باسيك للتطبيقات الإطار، انقر فوق إدراج > وحدة، ثم انسخ رمز VBA أدناه في نافذة الوحدة النمطية.
رمز فبا: أنشئ قائمة منسدلة تابعة في Word
Sub Populateddfood()
'Update by Extendoffice 2018/10/25
Dim xDirection As FormField
Dim xState As FormField
On Error Resume Next
Set xDirection = ActiveDocument.FormFields("ddfood")
Set xState = ActiveDocument.FormFields("ddCategory")
If ((xDirection Is Nothing) Or (xState Is Nothing)) Then Exit Sub
With xState.DropDown.ListEntries
.Clear
Select Case xDirection.Result
Case "Fruit"
.Add "Apple"
.Add "Banana"
.Add "Peach"
.Add "Lychee"
.Add "Watermelon"
Case "Vegetable"
.Add "Cabbage"
.Add "Onion"
Case "Meat"
.Add "Pork"
.Add "Beef"
.Add "Mutton"
End Select
End With
End Subالملاحظات:
1. في الكود ، يرجى تغيير العناصر الموجودة تحت كل حالة حسب حاجتك.
2. com.ddfood و فئة dd يجب أن تتطابق مع خيارات الإشارة المرجعية التي أدخلتها في الخيارين أعلاه خيارات حقل النموذج المنسدلة مربعات الحوار.
7. احفظ الرمز وارجع إلى المستند.
8. انقر بزر الماوس الأيمن فوق القائمة المنسدلة الأولى وانقر فوق عقارات لفتح خيارات حقل النموذج المنسدلة صندوق المحادثة. في مربع الحوار ، يرجى تحديد اسم الماكرو أعلاه (هنا Popolateddfood) من ملف خروج القائمة المنسدلة ، ثم انقر فوق OK .
9. انقر الآن المطور > تقييد التحرير كما هو موضح أدناه لقطة الشاشة.
10. في ال تقييد التحرير جزء ، تحتاج إلى:
10.1) تحقق من السماح فقط بهذا النوع من التحرير في المستند صندوق؛
شنومكس) حدد تعبئة النماذج خيار من القائمة المنسدلة ؛
شنومكس) انقر فوق نعم، ابدأ فرض الحماية زر؛
شنومكس) في ابدأ في فرض الحماية الحوار ، أدخل كلمة المرور وانقر فوق OK زر. انظر لقطة الشاشة:
الآن يتم إنشاء قائمة منسدلة تابعة. عند تحديد الفاكهة في القائمة المنسدلة الأولى ، يمكن تحديد فئات الفاكهة فقط في القائمة الثانية.
أفضل أدوات إنتاجية المكتب
كوتولس للكلمة - ارفع تجربة كلمتك مع أكثر 100 ميزات رائعة!
🤖 مساعد كوتولس AI: تحويل كتابتك باستخدام الذكاء الاصطناعي - توليد المحتوى / إعادة كتابة النص / تلخيص المستندات / الاستفسار عن المعلومات على أساس الوثيقة، كل ذلك داخل Word
📘 إتقان الوثيقة: تقسيم الصفحات / دمج المستندات / تصدير التحديد بتنسيقات مختلفة (PDF/TXT/DOC/HTML...) / دفعة تحويل إلى PDF / تصدير الصفحات كصور / طباعة ملفات متعددة في وقت واحد
✏ تحرير المحتويات: بحث واستبدال دفعة عبر ملفات متعددة / تغيير حجم كافة الصور / تبديل صفوف وأعمدة الجدول / تحويل الجدول إلى نص
🧹 تنظيف سهل: اكتساح بعيدا مساحات اضافية / فواصل القسم / كل الرؤوس / مربعات النص / الارتباطات التشعبية / لمزيد من أدوات الإزالة، توجه إلى موقعنا إزالة المجموعة
➕ إدراجات إبداعية: إدراج الف فاصل / مربعات الاختيار / أزرار الراديو / رمز الاستجابة السريعة / الباركود / جدول الخط القطري / شرح المعادلة / صورة توضيحية / الجدول التوضيحي / صور متعددة / اكتشف المزيد في أدخل المجموعة
🔍 التحديدات الدقيقة: يحدد بدقة صفحات محددة / الجداول / الأشكال / فقرات العناوين / تحسين التنقل باستخدام الأكثر من ذلك حدد الميزات
⭐ تحسينات النجوم: انتقل بسرعة إلى أي مكان / الإدراج التلقائي للنص المتكرر / التبديل بسلاسة بين نوافذ المستندات / 11 أدوات التحويل
