Clever-Excel-Forum

Normale Version: Excel Blatt über Wert in ComboBox auswählen
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo miteinander

ich habe ein Problem mi folgendem Code und ich komme nicht drauf was falsch ist
Code:
Private Sub CommandButton1_Click()

    Dim a As Variant
    Dim b As Variant
    Dim d As Variant
   
    a = Me.ComboBox1
       
    If ComboBox2 = "Januar" Then
   
    d = Me.ComboBox1.Value - 1
   
    Sheets(d).Select
   
    b = ActiveSheet.Range("C18").Value
   
    Worksheets(a).Select
   
    Worksheets(a).Range("D7") = ComboBox4.Value - b
   
    End If
       
End Sub

Die Namen der Tabellenblätter sind Jahreszahlen wie zum Beispiel "2015", "2016", etc.
Wenn ich das Makro ausführe kommt immer der Laufzeitfehler 9 "Index ausserhalb des gültigen Bereichs" und beim Debugger bleibt er bei folgendem Punkt stehen:

Code:
Sheets(d).Select

der Wert wurde jedoch in der variablen "d" gespeichert und das Tabellenblatt mit dem Datum "d" existiert und ist sichtbar.

Was mache ich falsch?

Danke und Gruss

Primo
Hallo,
Sheets(CStr(d)).Select
Gruß Uwe