hab leider ein kleines Excel-Problem und komme nicht weiter.
Ich hab in Tabelle1 ne List mit vielen Namen, daraus ergibt sich per Makro neue Tabellen mit den Namen die in Tabelle1 stehen.
Ich hätte ziemlich gern das die namen in Tabelle1 ein Hyperlink haben zu den dazugehörigen Tabellennamen.
Kann mir hier jemand weiterhelfen?
Ich hab zur Zeit so ein Makro, aber der sagt mir die ganze Zeit das diese Verweis ungültig sind. Jetzt brauch ich eure Hilfe :-(
Option Explicit
Sub tabneu()
Dim i As Long
Application.ScreenUpdating = False
For i = Range("A1:A1").End(xlDown).Row To 1 Step -1
Sheets.Add Before:=Sheets(2)
With ActiveSheet
.Name = Sheets(1).Cells(i, 1)
.Buttons.Add(400, 20, 100, 25).Select
With Selection
.Text = "Liste erstellen"
.Font.FontStyle = "Fett"
.OnAction = "mein Makro"
End With
End With
Range("A1").Select
Sheets(1).Hyperlinks.Add Anchor:=Sheets(1).Cells(i, 1), Address:="", SubAddress:=Sheets(1).Cells(i, 1) & "!A1"
Next i
Sheets(1).Select
End Sub
Vielen Dank im Vorraus
Philipp