Herbers Excel-Forum - das Archiv

Spezielles Sheet aktivieren

Bild

Betrifft: Spezielles Sheet aktivieren
von: Steffen Vogelreuter

Geschrieben am: 15.02.2005 19:42:20
Ich habe in einer Exceldatei mehrer Sheets deren Name das folgende Muster hat
TB1-*, TB2-*, usw. Wobei * für Datum und Uhrzeit steht. Jetzt suche ich nach einer Möglichkeit, das Sheet TB1 zu aktivieren, ohne das ich genau weiß wie * aussieht.
Also in etwa so Worksheet("TB1" & *).Select. Wie könnte ich sowas umsetzen?
Steffen
Bild

Betrifft: AW: Spezielles Sheet aktivieren
von: K.Rola
Geschrieben am: 15.02.2005 19:50:53
Hallo,
so z.B.:
Sub TB()
Dim sh As Object
For Each sh In Sheets
If sh.Name Like "TB1*" Then
sh.Select
Exit For
End If
Next
End Sub

Gruß K.Rola
Bild

Betrifft: AW: Spezielles Sheet aktivieren
von: Steffen Vogelreuter
Geschrieben am: 15.02.2005 21:27:46
Supi, genau das macht es.
Danke fein.
Steffen
 Bild
Excel-Beispiele zum Thema "Spezielles Sheet aktivieren"
Beim Aktivieren einer CheckBox Häkchen in Zelle eintragen Menüpunkt SPEICHERN deaktivieren
10 UserForm-CheckBoxes als Serie aktivieren Beim Öffnen PowerPoint starten und danach Mappe aktivieren
Aktivieren mehrerer CheckBoxes unterbinden Deaktivieren und Aktivieren von Drag&Drop
Menüpunkt bei Aktivieren einer Mappe erstellen Menüpunkt "Zellen einfügen..." im Kontextmenü deaktivieren
Das Extras-Menü aktivieren/deaktivieren Bei Aktivieren eines Arbeitsblattes ComboBox neu einlesen