Hallo Alexander,
um auf Blätter zuzugreifen, die in einem Bereich eines Blattes aufgelistet sind, kannst Du einfach so vorgehen:
Worksheets(Worksheets("Auswahl").Range("B1").Text).Select
Wobei in B1 dann jetzt ein gültiger Registername steht.
Allerdings finde ich das jetzt nicht sehr praktikabel.
Alle Registerblätter haben einen Registernamen, der unten im Blattregister angezeigt wird und auf den Du dann mit Worksheets("MeinRegistername").Select zugreifst.
Es gibt aber auch den feststehenden Codeblattnamen, den Du im VBA-Editor links erkennen kanst. Du könntest diese Codeblattnamen in Deinen Makros verwenden und so zugreifen:
Tabelle1.Select
Dann kannst Du Deine Registerblattnamen nach Belieben ändern und alles läuft trotzdem problemlos weiter.
Die Codeblattnamen kannst Du übrigens auch im Eigenschaftsfenster im VBA an Deine Bedürfnisse anpassen:
Vorteilhaft wäre es mit tbl_ zu beginnen.
tbl_Blatt1 (MeinRegisterblatt)
viele Grüße
Karl-Heinz
|