كيف تبدأ استخدام وحدات الماكرو في Word

هل سئمت من أداء المهام المتكررة في Microsoft Word؟ مدفون داخل البرنامج هو أداة أتمتة قوية يمكنها أن تزيل هذه المهام عن يديك. نحن نتحدث عن وحدات الماكرو ، وعلى الرغم من أن الميزة تعتمد على Visual Basic for Applications (VBA) من Microsoft ، إلا أنه يمكنك استخدامها حتى إذا كانت فكرة الترميز تمنحك heebie-jeebies.

بنقرة واحدة على زر ، سيسجل Word أفعالك ، وينشئ ماكروًا يمكنك إعادة تشغيله كلما أردت. إذا كنت مغامرًا ، يمكنك بسهولة تعديل الماكرو للحصول على درجة إضافية من الأتمتة.

سنعرض لك هنا مثالًا بسيطًا ولكنه مفيد: كيفية أتمتة وظيفة البحث والاستبدال في Word.

تسجيل الماكرو

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

يمكنك البدء بمستند فارغ جديد أو فتح مستند موجود. إذا لم تكن قد قمت بذلك بالفعل ، فسيتعين عليك تمكين علامة التبويب المطور.

اذهب إلى ملف> خيارات> تخصيص الشريط . على اليمين ، تحت علامات التبويب الرئيسية ، افحص ال مطور اختيار. حدد موافق واخرج.

أفضل شيء يمكن مشاهدته على اليوتيوب

الآن دعونا ننشئ الماكرو الخاص بنا.

انقر المطور> تسجيل ماكرو .
سيُطلب منك تسمية الماكرو. أدخل ChangeSocietyName أو أي اسم آخر يناسبك. عند تسمية وحدات الماكرو ، تجنب المسافات والنقاط وعلامات التعجب والأحرف الخاصة ، وإلا فستتلقى رسالة خطأ. يمكنك استخدام الأرقام ، لكن يجب أن يكون الحرف الأول حرفًا.
يمكنك تعيين الماكرو إلى زر و / أو اختصار لوحة مفاتيح ، لكن هذا ليس مطلبًا. إذا اخترت Button ، فسيتيح لك Word إضافته إلى شريط أدوات الوصول السريع. يمكنك أيضًا إضافة وصف موجز للماكرو.
انقر نعم ، وسيقوم Word الآن بتسجيل أفعالك. نجاح السيطرة + H لإحضار البحث والاستبدال الحوار.
أدخل جمعية الحفاظ على أجهزة طب الأسنان العتيقة في دوري البحث والحفاظ على الأسنان العتيقة بدلاً من ذلك.
انقر استبدل الكل لتنفيذ عملية البحث والاستبدال. هذا هو الإجراء الوحيد الذي تريد تسجيله. لا يهم إذا كان الماكرو يحل محل أي نص بالفعل. الهدف هو حفظه للمستندات الأخرى.
هذا مهم: انقر المطور> إيقاف التسجيل . خلاف ذلك ، سيتضمن الماكرو جميع الإجراءات اللاحقة.

الآن دعونا نرى عملك اليدوي. افتح مستندًا يحتوي على اسم الجمعية. انقر المطور> وحدات الماكرو . إذا قمت بالنقر نقرًا مزدوجًا فوق ChangeSocietyName ، فسيقوم Word تلقائيًا بإجراء عملية البحث والاستبدال.

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

على الرغم من أننا ركزنا هنا على Microsoft Word ، يمكنك أيضًا استخدام وحدات الماكرو لزيادة الإنتاجية في Excel . وهناك الكثير من وحدات الماكرو الموفرة للوقت لبرنامج Microsoft OneNote.

الغوص في المدونة

الآن سنلقي نظرة أعمق على ماكرو Word الجديد. اذهب إلى المطور> وحدات الماكرو ، ولكن بدلاً من النقر المزدوج على الماكرو ، حدده وانقر يحرر . هذا يفتح محرر Visual Basic ، بيئة قائمة بذاتها لبناء تطبيقات VBA.

قد يبدو الأمر شاقًا ، لكن يمكنك تجاهل القوائم ومعظم اللوحات. ركز بدلاً من ذلك على النافذة التي تحتوي على الرمز. كما ترى ، كتب Word للتو ماكروًا يقوم بإجراء البحث والاستبدال.

  
Sub ChangeSocietyName()  
'  
' ChangeSocietyName Macro  
' Rename Society for the Preservation of Antique Dental Appliances  
'  
 Selection.Find.ClearFormatting  
 Selection.Find.Replacement.ClearFormatting  
 With Selection.Find  
 .Text = 'Society for the Preservation of Antique Dental Appliances'  
 .Replacement.Text = 'Dental Antiques Preservation League'  
 .Forward = True  
 .Wrap = wdFindContinue  
 .Format = False  
 .MatchCase = False  
 .MatchWholeWord = False  
 .MatchWildcards = False  
 .MatchSoundsLike = False  
 .MatchAllWordForms = False  
 End With  
 Selection.Find.Execute Replace:=wdReplaceAll  
End Sub

دعونا نشرح ما يحدث هنا.

الفرع الفرعي في السطر الأول هو اختصار لروتين فرعي ، وهو برنامج صغير يمكن تشغيله بمفرده أو كجزء من تطبيق VBA أكبر. الأسطر المسبوقة بعلامات اقتباس مفردة مخصصة للتعليقات. تخبر علامات الاقتباس VBA بتجاهل أي عبارات في هذه السطور.

كيف تعرف ما إذا كان بائع ebay شرعيًا

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

تعديل الماكرو

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

يمكنك أيضًا تعديل الماكرو لجعله أكثر فائدة ، وهذا ما سنفعله هنا. عند تشغيل Find and Replace ، سواء يدويًا أو عبر ماكرو ، يتذكر Word البحث عن النص واستبداله. في المرة التالية التي تفتح فيها مربع الحوار 'بحث واستبدال' ، سيبدو هكذا.

سيكون من الأفضل مسح القيم حتى نحصل على مربع حوار نظيف. سنفعل ذلك باستخدام ماكرو ثانٍ ، باستثناء هذه المرة ، سنفعل ذلك مباشرةً في Visual Basic.

في محرر Visual Basic ، حدد الروتين الفرعي بأكمله ، من السطر الأول إلى End Sub. نجاح Ctrl + C لنسخه.
ضع المؤشر أسفل End Sub واضغط السيطرة + V. . لقد قمت للتو بتكرار الإجراء الفرعي.
قم بتغيير الاسم من ChangeSocietyName إلى ClearFindReplace (أو أي اسم آخر يناسبك). هذا مهم لأن VBA سينشئ رسالة خطأ إذا حاولت تشغيل وحدات الماكرو بأسماء مكررة.
في ال .نص و استبدال النص القيم ، قم بإزالة النص مع ترك علامات الاقتباس. بشكل أساسي ، أنت تخبر Word بعدم العثور على أي شيء واستبداله بشيء ، ولكنك تقوم أيضًا بمسح هذه القيم.

يجب أن تبدو النتيجة كما يلي:

  
Sub ClearFindReplace()  
'  
' ClearFindReplace Macro  
' Clear Text from Find and Replace dialog  
'  
 Selection.Find.ClearFormatting  
 Selection.Find.Replacement.ClearFormatting  
 With Selection.Find  
 .Text = ''  
 .Replacement.Text = ''  
 .Forward = True  
 .Wrap = wdFindContinue  
 .Format = False  
 .MatchCase = False  
 .MatchWholeWord = False  
 .MatchWildcards = False  
 .MatchSoundsLike = False  
 .MatchAllWordForms = False  
 End With  
 Selection.Find.Execute Replace:=wdReplaceAll  
End Sub

الآن سنعود إلى الماكرو ChangeSocietyName. أسفل رمز Find and Replace ، ولكن قبل End Sub ، أدخل ClearFindReplace (بدون أقواس في النهاية).

هذا صحيح: ليس عليك إدخال كل الشفرة التي أنشأتها للتو ، فقط اسم الماكرو.

  
Sub ChangeSocietyName()  
'  
' ChangeSocietyName Macro  
' Rename Society for the Preservation of Antique Dental Appliances  
'  
 Selection.Find.ClearFormatting  
 Selection.Find.Replacement.ClearFormatting  
 With Selection.Find  
 .Text = 'Society for the Preservation of Antique Dental Appliances'  
 .Replacement.Text = 'Dental Antiques Preservation League'  
 .Forward = True  
 .Wrap = wdFindContinue  
 .Format = False  
 .MatchCase = False  
 .MatchWholeWord = False  
 .MatchWildcards = False  
 .MatchSoundsLike = False  
 .MatchAllWordForms = False  
 End With  
 Selection.Find.Execute Replace:=wdReplaceAll  
 ClearFindReplace  
 End Sub

عندما يقوم Word بتشغيل ChangeSocietyName ، سيقوم أولاً بتنفيذ وظيفة البحث والاستبدال الأصلية. ثم سوف يفسر ClearFindReplace على أنه أمر لتشغيل الماكرو الثاني.

المضي قدمًا مع VBA

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

نظرًا لأن VBA هي لغة برمجة كاملة ، يمكنك دمج الإجراءات الفرعية في تطبيقات أكبر باستخدام المتغيرات والحلقات والعبارات الشرطية والمزيد. وبمجرد أن تتعلم أساسيات VBA في Word ، يمكنك تطبيق الكثير من نفس المعرفة لإنشاء وحدات ماكرو في Microsoft Excel و Access.

تقول أمازون أنه تم تسليم الطرد الخاص بي

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

يشارك يشارك سقسقة بريد الالكتروني برنامج تعليمي للمبتدئين حول كتابة وحدات ماكرو VBA في Excel (ولماذا يجب أن تتعلم)

إذا كنت تستخدم Excel بانتظام ، فمن الجدير تعلم كيفية إنشاء وحدات ماكرو VBA والوصول إلى العديد من الوظائف والإمكانيات.

اقرأ التالي مواضيع ذات صلة

إنتاجية
مايكروسوفت وورد
مايكروسوفت أوفيس 365
مايكروسوفت أوفيس 2016
نصائح مايكروسوفت أوفيس
مايكروسوفت أوفيس 2019
وحدات الماكرو

نبذة عن الكاتب ستيفن بيل(6 مقالات منشورة)

ستيفن بيل كاتب تقني قديم يعيش في منطقة سان فرانسيسكو. قام بتأليف العديد من الكتب حول تطبيقات الكمبيوتر في النشر والتصميم الجرافيكي ، وهو محرر أخبار ومراجعات سابق لـ Macworld. يدير حاليًا The Steampunk Explorer ، وهو موقع ويب شهير لعشاق steampunk.

المزيد من Stephen Beale

اشترك في نشرتنا الإخبارية

انضم إلى النشرة الإخبارية لدينا للحصول على نصائح تقنية ومراجعات وكتب إلكترونية مجانية وصفقات حصرية!

انقر هنا للاشتراك