- - كيفية تغيير النمط لجميع الجداول في مايكروسوفت وورد

كيفية تغيير النمط لجميع الجداول في مايكروسوفت وورد

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

البحث عن نمط الجدول

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

حرك مؤشر الماوس فوق نمط الجدول الذي تريد تطبيقه على جميع الجداول ، وسوف تخبرك تلميح الأداة بما يسمى. لاحظ أسفل الاسم وكنت على استعداد لإنشاء الماكرو.

ماكرو نمط الجدول

تمكين علامة تبويب المطور في Word بالانتقال إلى ملف> خيارات> تخصيص الشريط. قم بتمكين شريط أدوات المطور ثم عد إلى وثيقتك.

في علامة التبويب المطور ، وانقر فوق وحدات ماكرو. اعطائها الاسم التالي ؛

ApplyTableStyle

انقر فوق "إنشاء" وأدخل ما يلي في التعليمات البرمجيةمع ذلك ، تحتاج إلى تحرير هذا السطر: tbl.Style = "تظليل متوسط ​​2 - بلكنة 1". استبدل الشيء الموجود داخل علامات الاقتباس باسم اسم نمط الجدول الذي نسخته في الخطوة السابقة. لا تقم بإزالة علامات الاقتباس من الرمز. ما عليك سوى إدخال اسم نمط الجدول وتشغيله.

Sub ApplyTableStyle()
Dim tbl As Table
For Each tbl In ActiveDocument.Tables
tbl.Style = "Medium Shading 2 - Accent 1"
Next
End Sub

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

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

تعليقات