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

انتقل الآن إلى علامة التبويب "المطور" . (في حالة عدم العثور على علامة التبويب "المطور" ، انتقل إلى قائمة "ملف" ، وانقر فوق "خيارات"، وفي الجزء الأيسر، انقر فوق "تخصيص الشريط"، ومن الجزء الأيمن، قم بتمكين مربع الاختيار "المطور" . انقر فوق "موافق" لرؤية علامة التبويب "المطور" على الشريط).

الآن انقر فوق Visual Basic.

ستُفتح نافذة Visual Basic ، في الجزء الأيسر، انقر على ThisDocument، سيظهر مُحرر Visual Basic . الآن، انسخ هذه الأسطر من الكود والصقها في مُحرر VB.
Sub AutoOpen()
'
' GoToMyBookmarkText
'
'
عند حدوث خطأ استئناف التالي
Selection.Find.ClearFormatting
مع 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
ActiveWindow.SmallScroll Up:=15
End Sub
Sub AutoClose()
'
' CreateMyBookmark
'
'
Selection.TypeText Text:=”**************”
نهاية الترجمة

بمجرد اللصق، قم بالخروج من محرر VB. واحفظ المستند كمستند ممكّن للماكرو ( انتقل إلى قائمة الملف واضغط على حفظ باسم).

من خيارات "حفظ كنوع" ، انقر فوق "مستند Word ممكّن بالماكرو" (*.docm)، ثم انقر فوق "حفظ" .

الآن ، احذف مستند وورد. عند فتح المستند نفسه، سيتم نقلك تلقائيًا إلى آخر سطر تم تعديله، وستظهر علامة النجمة (*) (التي تُشير في الواقع إلى أنك كنت تُعدّل هذا السطر سابقًا).

[ عبر TheFreeWindows ]