كيفية إنشاء مربع قائمة UserForm في Outlook

تمكّنك لغة برمجة الماكرو Visual Basic for Applications في Microsoft Outlook من إضافة نموذج إلى رسالة بريد إلكتروني يمكنها جمع البيانات من مستلميها. على سبيل المثال ، يمكنك إدراج VBA UserForm ومربع قائمة في رسالتك التي تعرض عناصر أو خيارات متعددة يمكن للمستلم الاختيار من بينها. قبل أن تتمكن من إضافة هذه الميزة إلى رسائلك ، تحتاج إلى إضافة علامة التبويب المطور وأدواتها إلى الشريط وتغيير إعدادات أمان Outlook للسماح بتشغيل وحدات ماكرو VBA.

الخطوة 1

انقر فوق علامة التبويب "ملف" ، ثم "خيارات" ثم "تخصيص الشريط".

الخطوة 2

حدد المربع المسمى "المطور" ضمن علامات التبويب الرئيسية ثم انقر فوق "موافق". سيعود Outlook تلقائيًا إلى اللوحة الرئيسية.

الخطوه 3

انقر فوق علامة التبويب "ملف" ثم "خيارات" و "مركز التوثيق" و "إعدادات مركز التوثيق".

الخطوة 4

حدد "إعدادات الماكرو" ، "تمكين كافة وحدات الماكرو" ثم انقر فوق "موافق" للسماح بتشغيل ماكرو مربع القائمة أثناء الاختبار. بمجرد الانتهاء من استخدام UserForm الخاص بك ، على الرغم من ذلك ، يمكنك تغيير الإعدادات الخاصة بك إلى "إعلامات لكافة وحدات الماكرو" لمزيد من الأمان.

الخطوة الخامسة

أعد تشغيل Outlook لتنشيط تغيير إعدادات أمان الماكرو.

الخطوة 6

انقر فوق علامة التبويب "المطور" ، ثم انقر فوق خيار "وحدات الماكرو".

الخطوة 7

اكتب اسمًا للماكرو الخاص بك ، ثم انقر فوق "إنشاء".

الخطوة 8

انقر فوق الزر "إدراج UserForm" لعرض مربع أدوات النموذج وإنشاء UserForm الذي سيحتوي على مربع القائمة الخاص بك.

الخطوة 9

انقر فوق عنصر التحكم "Listbox" في Toolbox ، واضغط باستمرار على زر الماوس ، واسحب عنصر التحكم إلى UserForm ثم حرره.

الخطوة 10

انقر فوق عنصر التحكم "CommandButton" في Toolbox ، واضغط باستمرار على زر الماوس ، واسحبه إلى UserForm ثم حرره.

الخطوة 11

انقر بزر الماوس الأيمن فوق "CommandButton" في UserForm ثم انقر فوق "عرض التعليمات البرمجية" لعرض رمز الماكرو VBA الخاص به.

الخطوة 12

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

CommandButton1_Click () خاص ، ListBox1.AddItem ListBox1.AddItem "أخضر" ListBox1.AddItem "Blue" End Sub

ListBox1 هو الاسم الذي يمنحه Outlook تلقائيًا لمربع القائمة الذي قمت بسحبه إلى UserForm. العبارة ListBox1.AddItem "Red" تجعل Red العنصر الأول في مربع القائمة.

انقر فوق "حفظ" ، اضغط على "F5" ثم انقر فوق CommandButton لتشغيل الماكرو. عند تشغيل الماكرو والنقر فوق "CommandButton" ستظهر الألوان الأحمر والأخضر والأزرق في مربع القائمة.