Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: mehrere Tabellenblätter per Makro anwählen

mehrere Tabellenblätter per Makro anwählen
06.02.2005 15:45:10
john
Hallo zusammen,
ich möchte per Makro alle Tabellenblätter anwählen lassen, die mit den Buchstaben "AAA" aufhören. Folgendermaßen hab ich's versucht:
For n = 1 To Sheets.Count
If Right(Sheets(n).Name, 3) = "AAA" Then
If ausw = "" Then ausw = n Else ausw = ausw & ", " & n
End If
Next
Sheets(Array(ausw)).Select
Gedacht war es so, daß der Variable "ausw" eine Liste der Indexnummer aller gewünschten Tabellenblätter zugeordnet wird (also z. B. "1, 3, 5").
Aber irgendwie haut das nicht hin, ich bekomme beim Versuch, den letzten Befehl auszuführen, immer die Fehlermeldung "Index außerhalb des gültigen Bereichs". Scheinbar kann Excel mit meinr n-Variable als Array nix anfangen. Kann da irgend jemand helfen?
Vielen Dank im Voraus!
Gruß,
john
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: mehrere Tabellenblätter per Makro anwählen
K.Rola
Hallo,
Option Explicit
Sub select_AAA()
Dim n As Integer
For n = 1 To Sheets.Count
If Right(Sheets(n).Name, 3) = "AAA" Then Sheets(n).Select False
Next
End Sub

Gruß K.Rola
AW: mehrere Tabellenblätter per Makro anwählen
06.02.2005 15:57:28
john
Hallo K.Rola,
funzt einwandfrei, tausend Dank! :)
Gruß,
john
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige