Clever-Excel-Forum

Clever-Excel-Forum > Office-Anwendungen > Excel > mit Auswahl aus Zelle Tabellenblatt wechseln
Normale Version: mit Auswahl aus Zelle Tabellenblatt wechseln
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.

Mario

05.04.2019, 15:13
Hallo zusammen,

ich lese im Excel die namen der Tabellenblätter aus. Diese werden in das Tabellenblatt "Blätter" geschrieben.
Über Daten prüfen kann ich die Namen im Tabellenblatt "Monitor" "I2" auswählen um damit das entsprechende Tabellenblatt (diese sollen standardmäßig ausgeblendet sein) einzublenden und zu aktivieren.
Leider bekommen ich die Fehlermeldung "Index außerhalb des gültigen Bereichs"

Code:
Private Sub Worksheet_Change(ByVal Target As Range)

   ActiveWorkbook.Sheets(ThisWorkbook.Sheets("Monitor").Range("I2").Value).Activate

End Sub

Kann hier eventuell jemand helfen.

Danke und Beste Grüße,
Mario

Crazy Tom

05.04.2019, 17:12
moin

das habe ich so getestet

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
   Dim strBlatt As String
   strBlatt = Range("I2").Value
   Sheets(strBlatt).Activate
End Sub

MfG Tom

Klaus-Dieter

05.04.2019, 17:13
Hallo,

das Blatt heißt 0021, in der Auswahl 21 das kann nicht funktionieren.

Crazy Tom

05.04.2019, 17:14
das Blatt hab ich gar nicht probiert  :19:

Mario

06.04.2019, 08:41
Hallo Tom,

vielen Dank funktioniert super. Die Blattnamen werden nicht mit einer null beginnen.
Damit läuft es supe.

Ich wünsche vielen Dank und noch ein schönes Wochenende.

VG Mario
Clever-Excel-Forum > Office-Anwendungen > Excel > mit Auswahl aus Zelle Tabellenblatt wechseln