Hyperlink
10.05.2004 15:52:41
micha
ich weiß es ist hier ein XL-Forum, aber vielleicht könnt ihr mir trotzdem helfen.
mit diesem XL-Code, löscht man HYperlonks, möchte dies nun für Word Dokumente machen:
Sub Hyperlink_delete()
Dim myHl As Hyperlink
For Each myHl In ActiveSheet.Hyperlinks
myHl.Delete
Next
End Sub
was muss geändert werden?
mfg
Micha
Anzeige