Automatisches Kopieren von Hyperlinks
21.07.2003 15:02:38
Martin S.
mit folgendem Makro
Sub Tabellenanlegenundkopieren()
Dim Zelle As Range
For Each Zelle In Selection
Sheets("Adresse").Activate
Sheets("Muster").Copy after:=Sheets("Adresse")
ActiveSheet.Name = Zelle.Value
Next Zelle
End Sub
erstelle ich mir eine Arbeitsmappe.
Nun enthält das Blatt "Muster" einige Hyperlinks, die auf bestimmte Bereiche in diesem Blatt verweisen.
Auch die, mit Hilfe des Makro, neu erstellten Blätter sollen die Links haben. Und zwar genau wie im Muster auf das jeweilige Blatt bezogen.
Wie kriege ich das hin?