בקשה | בקשת עזרה פקודת מאקרו לגלישת טקסט

[efij9181]

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

[shishko]

@efij9181 צאט GPT נתן לי את זה

Sub SetTextWrapBehindTextForSelected()
   Dim shp As Shape
   If Selection.ShapeRange.Count > 0 Then
       Set shp = Selection.ShapeRange(1)
       shp.WrapFormat.Type = wdWrapBehind
   Else
       MsgBox "אין אובייקט שנבחר."
   End If
End Sub 

תכתוב האם עובד אם לא אני ינסה לשפר בעצמי

[efij9181]

@shishko תודה רבה
נראה שזה עובד..

[shishko]

@efij9181 בכיף באופן כללי פקודות מאקרו אפשר לבקש מGPT