ich habe ein kleines Problem.
Ich ändere mit einer
Sub alle Links, je nach dem Wo sie alle abgespeichert werden, dh wenn es zum Beipiel auf CD liegt, sollen alle links auf Ordner auch noch funktionieren.
Nun aber das Problem, dass diese
Sub auch die www-Links abändert.
Wie kann ich das unterbinden?
Hier die SUB:
Sub Links_Ändern() 'Routine zum Anpassen aller Ordnerlinks an den
'eventuell neuen Speicherort
Dim h As Hyperlink, NeuerPfad As String, Dateiname As String, ws As Worksheet
For Each ws In Worksheets
For Each h In ws.Hyperlinks
h.Address = Modul1.Pfad & "\" & h.Name
Next h
Next ws
End Sub