bin gerade dabei mittels einer User Form Daten in ein Tabellenblatt abzugleichne,
das funktioniert auch ganz gut nur wenn ich denn Tabellennamen ändere bzw.
das Tabellenblatt kopiere klappt es halt nicht mehr. Auch mit einer Variable geht es nicht.
hier mal meine Formel:
Private Sub UserForm_Initialize()
Dim i As Integer
Dim na
na = ActiveSheet.Name
Me.TextBox1.ControlSource = Worksheets(na).Range("A16").adress
End Sub
so funtioniert es zwar aber nur wenn man halt direkt den Namen einträgt:
Private Sub UserForm_Initialize()
Me.TextBox2.ControlSource = "Tabelle1!A16"
End Sub
Gruß Michael