Unarguably Word 2010 هو أفضل محرر كلمات موجود ، بصرف النظر عن توفير أدوات التحرير الأساسية وأنماط الرسوم البيانية ، كما يوفر خيارًا لتخصيص المستند بأي طريقة تريدها. مخفيًا بشكل افتراضي ، يوفر Word 2010 خيارًا لإضافة وظائف مختلفة ، على سبيل المثال ، من قبل بإدراج بضعة أسطر من التعليمات البرمجية ، يمكنك دمج مستندات Word دون الحاجة إلى استخدام أي طرف ثالث مخصص تطبيق. في هذا المنشور ، سنقوم بإدراج بضعة أسطر من التعليمات البرمجية لدمج جميع محتويات المستندات الموجودة في نفس المجلد وإظهارها في مجلد جديد.
للبدء ، تحتاج أولاً إلى وضعها في نفس المجلد ، تأكد من أنها جميعًا تنتمي إلى نفس إصدار Word إما Doc أو Docx. كما ترى في لقطة الشاشة أدناه ، قمنا بفتح وثيقتين سيتم دمجهما معًا.
الآن افتح أي مستند Word وحفظه كمستند ماكرو ، لهذا ، انتقل إلى القائمة ملف وانقر حفظ باسم.
سيظهر مربع حوار من حفظ كنوع، انقر قالب Word تمكين ماكرو وانقر فوق حفظ.
سنستخدم محرر VB ، لذا نحتاج أولاً إلى إجرائه مطور علامة التبويب الظاهرة على نافذة Word. في حال لم تجد مطور علامة التبويب ، انتقل إلى ملف القائمة ، انقر فوق خيارات و
في النقر على الجزء الأيسر تخصيص الشريط، من الجزء الأيمن تمكين مطور خانة الاختيار. انقر لا بأس ب لترى مطور علامة تبويب على الشريط.انتقل الآن إلى مطور التبويب وانقر البصرية الأساسية.
ستصل إلى مربع حوار محرر VB ، من النقر بزر الماوس الأيمن فوق الشريط الجانبي الأيسر هذا المستند إلى افتح نافذة تحرير VB. سترى نافذة الكود على الجانب الأيمن. الآن ضع هذه الأسطر من التعليمات البرمجية فيه.
ملحوظة: لا تنس تغيير مسار المجلد حيث توجد المستندات وإصدار مستندات Word في سطور التعليمات البرمجية هذه. لتسهيل الأمر ، أضفنا هذا الاحتياط أمام الرموز أيضًا.
MergeDocs الفرعي ()
Dim rng As Range
تعتيم MainDoc كمستند
Dim strFile As String
Const strFolder = “C: \ Users \ Usman Javaid \ Desktop \ Word documents \” ||| (قم بتغيير المسار حيث توجد مستنداتك)
تعيين MainDoc = المستندات. أضف
strFile = Dir $ (strFolder & “* .docx”) ||| (قم بتغيير امتداد الملف إلى .doc إذا كنت تتعامل مع إصدار Word 97-03)
افعل حتى strFile = “”
تعيين rng = MainDoc. نطاق
رنج. طي wdCollapseEnd
رنج. InsertFile strFolder & strFile
strFile = Dir $ ()
عقدة
نهاية فرعية
الآن اضغط Ctrl + S لحفظ الماكرو المضافة حديثًا وإغلاق محرر VB. انتقل إلى مطور التبويب وانقر وحدات الماكرو.
من وحدات الماكرو الحوار ، حدد MergeDocs الماكرو وانقر يركض.
إذا كنت قد حددت المسار والإصدار بشكل صحيح ، فسيتم دمج جميع المستندات وفتحها في مستند جديد.
يمكنك أيضًا الاطلاع على الأدلة التي استعرضناها سابقًا على عد إلى السطر الأخير الذي تم تحريره في Word 2010 و باستخدام دمج المراسلات في Word 2010.
مثلما تحدثنا فتح ملفات docx دون استخدام Office 2010، ستركز هذه المش...
أحد الأسباب التي تجعل معظم المستخدمين يختارون PowerPoint لإنشاء الع...
هل تتساءل ما هي رسومات SmartArt وكيفية استخدامها في عرضك التقديمي؟ ...