Mit untenstehendem Code wähle ich mehrere Tabellen gleichzeitig an.
Wie kann mich mir die Tabellennamen der selektierten Tabellennamen
a) im Direktbereich ausgeben
b) in eine Variable schreiben (zur späteren Verwendung z.B. mit Sheets(Array("Tabelle1", "abc")).Select)
c) in Tabelle "Tabelle1" in Spalte A (ab Zeile 2) ausgeben?
Gruss, Peter
Sub Test()
Dim x As Integer
ThisWorkbook.Worksheets(3).Select
For x = 4 To ThisWorkbook.Worksheets.Count
Worksheets(x).Select (False)
Next x
End Sub