أنت غير متصل حاليًا، وفي انتظار الإنترنت الخاص بك ليقوم بإعادة الاتصال

كيفية إضافة بيانات إلى عنصر تحكم ComboBox أو عنصر تحكم ListBox في برنامج Excel أو Word‏

انتهاء دعم Office 2003

لقد أنهت شركة Microsoft دعم Office 2003 في 8 أبريل، 2014. وقد أثر هذا التغيير على تحديثات البرامج لديك وخيارات الأمان الخاصة بك. تعرف على ما يعنيه ذلك فيما يتعلق بك وكيفية الحفاظ على حمايتك.

للحصول على نسخة من هذه المقالة خاصة بـ Microsoft Excel لنظام التشغيل Mac، راجع المقالة التالية 185388. (قد تحتوي هذه المقالة على ارتباطات إلى محتوى باللغة الإنجليزية (محتوى لم تتم ترجمته بعد))
الموجز
توضح هذه المقالة طريقتين لملء عنصر تحكم "مربع تحرير وسرد" أو عنصر تحكم "مربع قائمة".
معلومات أخرى
تقدم Microsoft الأمثلة البرمجية بغرض التوضيح فقط، دون أي ضمان صريح أو ضمني. ويتضمن ذلك، على سبيل المثال لا الحصر، الضمانات الضمنية الخاصة بالتسويق أو الملاءمة لغرض معين. تفترض هذه المقالة أنك معتاد على لغة البرمجة التي يتم شرحها والأدوات المستخدمة لإنشاء الإجراءات وتصحيحها. يمكن لمهندسي الدعم لدى Microsoft شرح الوظيفة الخاصة بإجراء محدد، ولكن لن يقوموا بتعديل هذه الأمثلة لتقديم وظيفة إضافية أو إنشاء إجراءات تلبي متطلباتك الخاصة.

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

الطريقة الأولى: كيفية ربط مربع تحرير وسرد أو مربع قائمة في ورقة عمل Excel

  1. قم بإنشاء ورقة عمل جديدة في Microsoft Excel. في ورقة ١، اكتب التالي:
          A1: One     B1: Red      A2: Two     B2: Green      A3: Three   B3: Yellow      A4: Four    B4: Blue					
  2. اضغط مفتاحي ALT+F11 لبدء تشغيل محرر Microsoft Excel Visual Basic.
  3. من القائمة Insert (إدراج)، انقر فوق UserForm (نموذج مستخدم).
  4. قم بإنشاء عنصر تحكم مربع تحرير وسرد وعنصر تحكم مربع قائمة في نموذج المستخدم.
  5. إذا لم يكن الإطار Properties "خصائص" مرئيًا، انقر فوق Properties Window (إطار الخصائص) في القائمة View (عرض).
  6. انقر فوق ComboBox (مربع تحرير وسرد)، ثم قم بالتمرير إلى RowSource (مصدر الصف) في Properties window (إطار الخصائص).

    ينقسم الإطار إلى قسمين. يحتوي القسم الأيسر على اسم خاصية عنصر التحكم. ويحتوي القسم الأيمن على قيمة الخاصية. انقر في القسم الأيمن من "مصدر الصف"، ثم اكتب "sheet1!a1:a4" (دون علامتي الاقتباس).
  7. انقر فوق ListBox (مربع قائمة)، ثم قم بالتمرير إلى RowSource (مصدر الصف) في الإطار Properties. انقر في القسم الأيمن من "مصدر الصف"، ثم اكتب "sheet1!b1:b4" (دون علامتي الاقتباس).

    ملاحظة: إذا قمت بحذف مرجع الورقة، يتم ملء عنصري تحكم مربع التحرير والسرد ومربع القائمة بالبيانات من الخلايا الموجودة في ورقة العمل النشطة عند تشغيل نموذج المستخدم. للتأكد من استخدام البيانات من نفس ورقة العمل دومًا لملء نموذج المستخدم، قم بتضمين مرجع الورقة كما هو موضح في الأمثلة. لملء نموذج المستخدم بالبيانات الموجودة في الورقة النشطة، لا تقم بتضمين مرجع الورقة في "مصدر الصف". عندما تقوم بذلك، يستخدم الماكرو البيانات الموجودة في الورقة النشطة لملء نموذج المستخدم.
  8. قم بتشغيل نموذج المستخدم بالنقر فوق Run (تشغيل)، ثم النقر فوق Run Sub/UserForm.
تظهر الأرقام One وTwo وThree وFour في عنصر تحكم "مربع التحرير والسرد"، بينما تظهر الألوان Red وGreen وYellow وBlue في عنصر التحكم "مربع القائمة".

الطريقة الثانية: كيفية استخدام ماكرو Visual Basic Macro لملء مربع تحرير وسرد أو مربع قائمة

  1. افتح أحد تطبيقات Microsoft Office مثل Microsoft Excel أو Microsoft Word.
  2. اضغط مفتاحي ALT+F11 لبدء تشغيل محرر Visual Basic.
  3. من القائمة Insert (إدراج)، انقر فوق UserForm (نموذج مستخدم).
  4. قم بإنشاء عنصر تحكم مربع تحرير وسرد وعنصر تحكم مربع قائمة في نموذج المستخدم.
  5. انقر بزر الماوس الأيمن فوق نموذج المستخدم، ثم انقر فوق View Code (عرض التعليمات البرمجية). يظهر إطار Code "التعليمة البرمجية" لنموذج المستخدم. انقر فوق Initialize (تهيئة) في القائمة Procedure (إجراء) (في الجانب الأيمن).

    يتم إدراج الصفين الأول والأخير من الروتين الشائع تلقائيًا، ويتم وضع نقطة الإدراج تلقائيًا بين الصفين.
  6. اكتب التعليمة البرمجية التالية:
          ListBox1.List = Array("One", "Two", "Three", "Four")‎      ComboBox1.List = Array("Red", "Green", "Yellow", "Blue")‎						
    تظهر هذه التعليمة البرمجية بين السطرين "Sub UserForm_Initialize(‎)‎" و"End Sub".
  7. من القائمة Run (تشغيل)، انقر فوق Run Sub/UserForm لتشغيل نموذج المستخدم.
تظهر الأرقام One وTwo وThree وFour في عنصر التحكم "مربع القائمة"، بينما تظهر الألوان Red وGreen وYellow وBlue في عنصر تحكم "مربع التحرير والسرد".
مراجع
لمزيد من المعلومات حول نماذج المستخدمين، انقر فوق علامة التبويب Index (الفهرس) في تعليمات Microsoft Visual Basic، ثم اكتب النص التالي:
UserForm Object
، ثم انقر نقرًا مزدوجًا فوق النص المحدد للانتقال إلى موضوع UserForm Object "كائن نموذج المستخدم".
XL97 97 userform user form combo box list vba
خصائص

رقم الموضوع: 161598 - آخر مراجعة: 09/18/2011 09:39:00 - المراجعة: 4.0

  • Microsoft Excel 2002 Standard Edition
  • Microsoft Word 2002 Standard Edition
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Word 2000 Standard Edition
  • Microsoft Excel 97 Standard Edition
  • Microsoft Word 97 Standard Edition
  • Microsoft Word 2010
  • Microsoft Office Word 2007
  • Microsoft Office Excel 2003
  • Microsoft Excel 2010
  • Microsoft Office Excel 2007
  • Microsoft Office Word 2003
  • kbcontrol kbdtacode kbhowto kbprogramming KB161598
تعليقات
rosoft.com/ms.js" '="">om/ms.js" '="">