ich verzweifle gerade an dem Inhalt einer in einer UserForm befindlichen ComboBox.
Zurzeit werden mir in dieser ComboBox alle Tabellenblätter angezeigt. Ich möchte jedoch nur die angezeigt bekommen, die dreistellig sind.
Hier mein bisheriger Code:
Private Sub CommandButton1_Click()
Worksheets(ComboBox1.Value).Activate
With Me.ComboBox1
Unload Me
End With
End Sub
Private Sub UserForm_Initialize()
Dim i
For i = 1 To Worksheets.Count
With Me.ComboBox1
.AddItem Worksheets(i).Name
.ListIndex = 0
End With
Next i
End Sub
Ich hoffe, dass ihr mir dabei helfen könnt :)
Danke