Phintz
asked on
Replace text for image
Could anyone please how i can replace à text string for an image in word?
So far i have tried this which provides The image every time regardless of The string.
Sub brief()
Dim obj As LineShape
Set obj = ActiveDocument.LineShapes. AddPicture (FileName: = _
"C:\Users\Peter Hintzen\Documents\registra tie documenten\handtekening.jp g", LinkToFile:=False, _
SaveWithDocument:=True, Left:=-35, Top:=560)
With obj
.WrapFormat.Type = 3
.ZOrder 5
End With
End Sub
So far i have tried this which provides The image every time regardless of The string.
Sub brief()
Dim obj As LineShape
Set obj = ActiveDocument.LineShapes.
"C:\Users\Peter Hintzen\Documents\registra
SaveWithDocument:=True, Left:=-35, Top:=560)
With obj
.WrapFormat.Type = 3
.ZOrder 5
End With
End Sub
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
This question has been classified as abandoned and is closed as part of the Cleanup Program. See the recommendation for more details.