עזרה בוורד האם יש דרך (אולי במאקרו) לחזור למיקום האחרון מיד בפתיחת המסמך?

[שיקול דעת]

אשמח לעזרה.

 

[סוגרים שידוך]

החל מוורד 2013 נפתח חלונית קטנה בצד המסמך עם קישור למקום האחרון

 

[xl3391]

ctrl+end מביא לסוף המסמך

 

[moishy]

שני מאקרואים פשוטים,
אחד בסגירת הקובץ: יוצר סימניה במקום הסמן
אחד בפתיחת הקובץ: עובד לסימניה ומחק אותה

 

[גרפיקנער]

שיפט+ F5

 

[סוגרים שידוך]

שני מאקרואים פשוטים,
אחד בסגירת הקובץ: יוצר סימניה במקום הסמן
אחד בפתיחת הקובץ: עובד לסימניה ומחק אותה

אתה יכול לשכתב את זה?
איך יוצרים מקארו שיקבל פקודת יצירת סימניה בעת סגירה?
ואיך יוצרים מקארו שמוחק סימניה אחרונה בפתיחת הקובץ?

 

[moishy]

אתה יכול לשכתב את זה?
איך יוצרים מקארו שיקבל פקודת יצירת סימניה בעת סגירה?
ואיך יוצרים מקארו שמוחק סימניה אחרונה בפתיחת הקובץ?

בבקשה

Private Sub Document_Close()
    Selection.Collapse Direction:=wdCollapseStart
    ActiveDocument.Bookmarks.Add Name:="LastLocation", Range:=Selection.Range
End Sub

Private Sub Document_Open()
    Selection.GoTo what:=wdGoToBookmark, Name:="LastLocation"
    ActiveDocument.Bookmarks("LastLocation").Delete
End Sub

 

[סוגרים שידוך]

זה לא עובד לי

 

[moishy]

זה לא עובד לי

איפה שמת את הקוד?

 

[סוגרים שידוך]

פתחתי 2 מקארו רגילים ושמרתי, ונכנסתי אליהם ושם הדבקתי את הטקסט

 

[moishy]

פתחתי 2 מקארו רגילים ושמרתי, ונכנסתי אליהם ושם הדבקתי את הטקסט

ולכן זה לא עבד.
את הקוד כפי ששמתי אותו יש להדביק ישירות במודול ThisDocument

 

[שרה מגן]

למה לא להשתמש בעצה שכתבו למעלה שיפט+ F5 ???
כל כך פשוט ונוח.

 

[סוגרים שידוך]

ולכן זה לא עבד.
את הקוד כפי ששמתי אותו יש להדביק ישירות במודול ThisDocument

תודה רבה זה עובד מצוין
חסכת לי לחיצה על שיפט+ F5
תזכו למצוות

 

[שיקול דעת]

למה לא להשתמש בעצה שכתבו למעלה שיפט+ F5 ???
כל כך פשוט ונוח.

אנחנו מדברים על מאקרו שמיד בפתיחת המסמך נגיע למיקום האחרון שבו עזבנו המסמך כשסגרנו אותו בפעם האחרונה.

 

[שיקול דעת]

בבקשה

Private Sub Document_Close()
    Selection.Collapse Direction:=wdCollapseStart
    ActiveDocument.Bookmarks.Add Name:="LastLocation", Range:=Selection.Range
End Sub

Private Sub Document_Open()
    Selection.GoTo what:=wdGoToBookmark, Name:="LastLocation"
    ActiveDocument.Bookmarks("LastLocation").Delete
End Sub

מה אני צריך להוריד מהמאקרו השני אם אני רוצה בעצמי לבחור אם לחזור למיקום האחרון. כלומר, שבסגירת המסמך יווצר הסימון, אבל בפתיחת המסמך רק אם אלחץ על המאקרו (או קיצור דרך) זה יחזיר אותי למיקום אחרון.

 

[סוגרים שידוך]

בשביל ללחוץ לא צריך מאקארו
זה כבר מובנה בוורד (2013 ואילך)

 

[שיקול דעת]

בשביל ללחוץ לא צריך מאקארו
זה כבר מובנה בוורד (2013 ואילך)

במקרה אני עוד מהישנים... יש לי רק 2010.

 

[moishy]

מה אני צריך להוריד מהמאקרו השני אם אני רוצה בעצמי לבחור אם לחזור למיקום האחרון. כלומר, שבסגירת המסמך יווצר הסימון, אבל בפתיחת המסמך רק אם אלחץ על המאקרו (או קיצור דרך) זה יחזיר אותי למיקום אחרון.

את המאקרו השני להכניס במודול רגיל, ולשנותו כך:

Public Sub GoToBookmark()
    Selection.GoTo what:=wdGoToBookmark, Name:="LastLocation"
    ActiveDocument.Bookmarks("LastLocation").Delete
End Sub