בירור | האם יש דרך להוספת הערות סקירה על הערות שוליים וסיום?

[יעב"ץ]

כבר כתבתי את השאלה הזו כטפלה לנושא אחר, עכשיו אציג אותה בנפרד, בכבוד הראוי לה.

האם יש דרך להוספת הערות סקירה על הערות שוליים וסיום בוורד?

כל המסייעים יזכו לרב טוב.

[יוסף מאיר וייס]

@יעב-ץ תפתח את הנושא בקטגורית עזרה הדדית - וורד

[יעב"ץ]

@יוסף-מאיר-וייס
ייש"כ.

[שלמה11]

אני לא מכיר לעומק, אבל ככל הנראה התשובה היא לא.
הערות שולים וסיום מאוד מוגבלות בוורד, ויש הרבה דברים שא"א להחיל על הערות שולים.

Spoiler

כגון: עיגון של צורה, חלוקה לטורים ועוד ועוד...

[יעב"ץ]

@שלמה11
זה ממש מוזר, ומקשה על ההתנהלות.
הייתי בהלם כשהבנתי את זה.
אין לזה שום פתרון או מענה?

@כולם.

[צבי צ]

@יעב-ץ
לא קיים!
גם הרב @יואל-שילה בבקלות לא מצא לזה פתרון.
האפשרות היחידה היא להזריח את הטקסט בהערה ולכתוב הערת סקירה בהפנייה להערת שוליים / סיום.

[יעב"ץ]

@צבי-צ
ככה אני עושה, וזה די מסורבל, כמובן...
בכל אופן, תודה רבה, לפחות לא אכלה את זמני בחיפושים מיותרים.

[צבי צ]

@יעב-ץ
נכון,
יצרתי מאקרו [ושיפצתי בעזרת קלוד].
נשאר לך רק לעשות קיצור דרך.

Sub הערת_סקירה_בהערת_שוליים()
    Dim cmt As Comment
    Dim txt As String

    txt = InputBox("הקלד את הערת הסקירה:", "הערת סקירה")
    If txt = "" Then Exit Sub

    Options.DefaultHighlightColorIndex = wdYellow
    Selection.Range.HighlightColorIndex = wdYellow

    ActiveWindow.View.SeekView = wdSeekMainDocument

    Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend

    Set cmt = Selection.Comments.Add(Range:=Selection.Range)
    cmt.Range.Text = txt

    ' סגירת חלונית הסקירה - אחרי ההוספה
    If ActiveWindow.Panes.Count > 1 Then
        ActiveWindow.Panes(2).Close
    End If
    ActiveWindow.View.SeekView = wdSeekMainDocument
End Sub

[יעב"ץ]

@צבי-צ
ומי שיקבל את הקובץ יוכל לראות את זה? לערוך?

[צבי צ]

@יעב-ץ
צריך לסמן את המילים שעליהם אתה רוצה לכתוב את ההערת סקירה, ולהפעיל את המאקרו,
יפתח לך תיבה לכתוב את ההערת סקירה ואח"כ תלחץ OK או אנטר.
וזה מגיע כהערת סקירה רגחלה עם השם שלך, הנמען לא יכול לדעת איך כתבת את ההערה.

Spoiler

אגב אם אתה עובד בעריכה וכדו', הלקוח / המכון מעדיף כאלה דברים שמטבע הדברים מקצרים את העבודה ולכן הוא המרוויח הגדול.