בקשת מידע | יש אפשרות להמיר הערות בלון (או הערת קישור) להערות שוליים?

[הרב יעקב ישראל]

ביצוא קובץ מתוכנת קל לזכור, מתקבל קובץ כדוגמת הקובץ המצורף.
נשאלתי אם ישנה אפשרות, להפוך את ההערות שמופיעות בריחוף על המילים המודגשות, להערות שוליים באופן אוטומטי לכל המסמך.
(וסתם לסקרנות: איזה סוג הערות אלו?)
דוגמא.docx
@האדם-החושב @pcinfogmach וכל מי שיכול לעזור.

[pcinfogmach]

@הרב-יעקב-ישראל
אין אלו הערות אמיתיות אלא היפר קישור (בלי הטקסט המקושר)

כדי לצפות בהערות ניתן ללחוץ על alt + f9

כדי להמיר את ההערו לכאורה אפשר ליצור מאקרו שמחפש את הסוגריים המסולסלות של ההיפר קישור
ואז שומר את הטקסט שביניהם כ string
ואז בפקודת replace להסיר את כל מה שלא באמת חלק מההערה
ואז להכניס הכל להערת שוליים (כנראה שצריך להגידר range בתחילת המאקרו כדי שתוכל להכניס את הכל במיקום הנכון)

[הרב יעקב ישראל]

אם מישהו יוכל לעזור לי בהכנת המאקרו, אודה לו מאוד.

[pcinfogmach]

@הרב-יעקב-ישראל
מסתבר שאי אפשר למצוא קודי שדה על ידי חיפוש רגיל של וורד
הנה משהו חפלפ אבל נראה לי שעובד
שים לב! קוד זה ממיר את כל קודי שדה מסוג hyperlink (קישור)

Sub המרת_הערות_בלון_להערות_שוליים()
    Dim doc As Document
    Dim MYfield As field
    Dim myFootnoteText As String
    Dim myFieldText As String
    Dim myRange As Range
    
    ' Set a reference to the active document
    Set doc = ActiveDocument
    
    ' Loop through all the fields in the document
    For Each MYfield In doc.Fields
     If MYfield.Type = 88 Then
     Set myRange = MYfield.Result
     myFieldText = MYfield.Result.text
     myFootnoteText = MYfield.Code.text
     myFieldText = Replace(myFieldText, " HYPERLINK \o """, "")
     myFieldText = Replace(myFieldText, " \h""", "")
    MYfield.Delete
    Selection.Footnotes.Add Range:=myRange, Reference:="", text:=myFootnoteText
    myRange.InsertBefore myFieldText
    End If
    Next MYfield
End Sub

[הרב יעקב ישראל]

@pcinfogmach אני אנסה, תודה רבה!

[הרב יעקב ישראל]

@pcinfogmach סליחה על הבורות... אבל לאיפה אני אמור להעתיק את הקוד (בויזואל בייסיק? א"כ איפה?)?

[דאנציג]

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

בהצלחה

[u88]

@הרב-יעקב-ישראל כתב בבקשת מידע | יש אפשרות להמיר הערות בלון (או הערת קישור) להערות שוליים?:

ביצוא קובץ מתוכנת קל לזכור, מתקבל קובץ כדוגמת הקובץ המצורף.
נשאלתי אם ישנה אפשרות, להפוך את ההערות שמופיעות בריחוף על המילים המודגשות, להערות שוליים באופן אוטומטי לכל המסמך.
(וסתם לסקרנות: איזה סוג הערות אלו?)
דוגמא.docx
@האדם-החושב @pcinfogmach וכל מי שיכול לעזור.

פירסמו פה אפשהו תוסף שנקרא וורד מתקדם שם יש אופציה של הסרת הערות בלון והפיכתם להערות שוליםם וכו' וכו' מומלץ מאוד

[הרב יעקב ישראל]

@u88 נשמח לקישור ממי שיודע.

[u88]

@הרב-יעקב-ישראל
בשמחה https://mitmachim.top/post/299606