روتين فرعي لـ Excel VBA: كيفية استدعاء Sub في VBA مع مثال

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

لماذا استخدام الروتينات الفرعية

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

قبل كتابة الاسم، يتوقع المترجم أن يتبع الاسم مجموعة قصيرة من القواعد.

قواعد تسمية الإجراءات الفرعية والوظائف

لاستخدام الإجراءات الفرعية والوظائف، هناك مجموعة من القواعد التي يجب على المرء اتباعها.

• لا يمكن أن يحتوي اسم وظيفة استدعاء روتين فرعي أو VBA على مسافة
• يجب أن يبدأ اسم Excel VBA Call Sub أو اسم الوظيفة بحرف أو شرطة سفلية. ولا يمكن أن يبدأ برقم أو حرف خاص
• لا يمكن أن يكون اسم الروتين الفرعي أو الوظيفة كلمة أساسية. الكلمة الرئيسية هي كلمة لها معنى خاص في VBA. كلمات مثل Private وSub وFunction وEnd وما إلى ذلك كلها أمثلة على الكلمات الرئيسية. يستخدمها المترجم لمهام محددة.

بعد اختيار اسم صالح، يتبع الإعلان نفسه نمطًا ثابتًا.

بناء جملة الروتين الفرعي لـ VBA

سوف تحتاج إلى تمكين علامة التبويب "المطور" في Excel لمتابعة هذا المثال. إذا كنت لا تعرف كيفية تمكين علامة تبويب المطور، فاقرأ البرنامج التعليمي عناصر تحكم VBA في Excel

هنا في بناء الجملة،

Private Sub mySubRoutine(ByVal arg1 As String, ByVal arg2 As String)
    'do something
End Sub

شرح النحو

يقبل البرنامج الفرعي التالي الاسم الأول والأخير ويعرضهما في مربع رسالة.

الآن سنقوم ببرمجة وتنفيذ هذا الإجراء الفرعي. دعونا نرى هذا.

Private Sub displayFullName(ByVal firstName As String, ByVal lastName As String)
    MsgBox firstName & " " & lastName
End Sub

Private Sub btnDisplayFullName_Click()
    displayFullName "John", "Doe"
End Sub

يُعد الزر مريحًا، ولكنه ليس الطريقة الوحيدة لبدء روتين فرعي، ونادرًا ما يكون الأسرع أثناء التطوير.

كيفية تشغيل روتين فرعي بدون زر

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

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

للخيار الأخير شكلان مقبولان. كتابة الاسم متبوعًا بالوسائط المجردة تعمل، وكذلك استخدام الكلمة المفتاحية Call صراحةً، لكن قاعدة الأقواس تختلف بينهما.

Sub RunTheGreeting()
    ' Form 1: no Call keyword, no brackets
    displayFullName "John", "Doe"

    ' Form 2: Call keyword, brackets required
    Call displayFullName("Jane", "Roe")
End Sub

يؤدي كلا السطرين نفس الوظيفة تمامًا. ويُعدّ خلط الشكلين، بكتابة الأقواس بدون الكلمة المفتاحية Call، السبب الأكثر شيوعًا لخطأ الترجمة "المتوقع: =" عندما تأخذ دالة فرعية أكثر من وسيط واحد.

الفرق بين الإجراء الفرعي والدالة في VBA

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

استخدم إجراءً فرعيًا عندما يعمل الكود على المصنف، و دالة VBA عندما ينتج الكود إجابة يستهلكها شيء آخر.

الأسئلة الشائعة