WD97: كيفية إنشاء مربعات اختيار خاص يدوياً باستخدام VBA

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

اضغط هنا لرابط المقالة باللغة الانجليزية172178
تمت أرشفة هذه المقالة. وتظهر "كما هي" ولن يتم تحديثها بعد الآن.
الموجز
في Microsoft Word، لا يوجد أية وظائف المضمنة لإجبار مستخدم من تحديد "حقل نموذج خانة اختيار" واحدة فقط من مجموعة من خانات الاختيار.

على سبيل المثال، إذا كان لديك خانات الاختيار الثلاثة: نعم, لا ، و Undecided ، يمكن للمستخدم تحديد أكثر من واحد في كل مرة. ومع ذلك، تحتاج إلى تحديد المستخدم من تحديد خانة الاختيار واحد فقط.

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

Microsoft المعتمدين Partners – https://partner.microsoft.com/global/30000104

خدمات Microsoft المستند الذي يقدم النصائح - http://support.microsoft.com/gp/advisoryservice

للحصول على مزيد من المعلومات حول خيارات الدعم المتوفرة وحول كيفية الاتصال بشركة Microsoft قم بزيارة موقع Microsoft التالي على الويب: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMSيوضح النموذج التالي Visual Basic للتطبيقات الماكرو مجموعتين من خانات الاختيار في نموذج. يحتوي على مجموعة واحدة خانات الاختيار المسمى نعم، لا الموجودة Undecided ويحتوي مجموعة أخرى خانات الاختيار المسمى True "و" False. عند تحديد إحدى خانات الاختيار في المجموعة ، يتم مسح خانات الاختيار الأخرى.
   Sub ToggleCheckBoxOnEntry()      Dim fFields As FormFields      Dim fSelectedField As FormField      Set fFields = ActiveDocument.FormFields      For Each fSelectedField In Selection.FormFields         ' Form field must be a check box.         If fSelectedField.Type = wdFieldFormCheckBox Then            ' Go to the case for the currently selected group.            Select Case fSelectedField.Name               ' Yes, No, or Undecided check box group.               Case "Yes", "No", "Undecided"                  ' Clear all values.                  fFields("Yes").CheckBox.Value = False                  fFields("No").CheckBox.Value = False                  fFields("Undecided").CheckBox.Value = False               ' True or False check box group.               Case "True", "False"                  ' Clear all values.                  fFields("True").CheckBox.Value = False                  fFields("False").CheckBox.Value = False               ' You can add other Case statements for other groupings.               ' For example:               'Case               '   <Code>               'Case               '   <Code>               Case Else            End Select            ' Check the selected formfield.            fSelectedField.CheckBox.Value = True         End If      Next   End Sub				
لاستخدام هذا الماكرو أي خانة الاختيار تجميع داخل المستند تعيين ToggleCheckBoxOnEntry() كـ الماكرو إدخال كل "حقل نموذج خانة اختيار" في المجموعة.

للحصول على مزيد من المعلومات حول بيان الخصوصية "تحديد حالة" انقر فوق مساعد Office أثناء في محرر Visual Basic ، اكتب عبارة "تحديد حالة" ، انقر فوق بحث ، ثم انقر فوق لعرض "بيان حالة حدد."

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


للحصول على مزيد من المعلومات، الرجاء مراجعة المقالة التالية في "قاعدة المعارف لـ Microsoft:
173707OFF97: كيفية تشغيل نموذج لتعليمة برمجية من مقالات قاعدة معارف
مراجع
للحصول على مزيد من المعلومات حول الحصول على تعليمات Visual Basic for Applications الرجاء مراجعة المقالة التالية في "قاعدة المعارف لـ Microsoft:
163435VBA: برمجة موارد Visual Basic للتطبيقات
wordcon vbe vba VB

تحذير: تمت ترجمة هذه المقالة تلقائيًا

خصائص

رقم الموضوع: 172178 - آخر مراجعة: 02/07/2014 09:40:29 - المراجعة: 2.4

Microsoft Word 97 Standard Edition

  • kbnosurvey kbarchive kbmt kbdtacode kbhowto kbmacroexample kbui KB172178 KbMtar
تعليقات