Aktives Worksheet in ComboBox ausgeben
24.03.2016 16:32:23
Steffen
ich habe ein kleines Problem und hoffe, dass ich hier im Forum Hilfe dazu bekomme.
In einer UserForm "formSetup" lasse ich mir in einer ComboBox "cboSheetNames" alle Worksheets ausgeben:
Dim offset As Integer
For Each wksht In Worksheets
formSetup.cboSheetNames.AddItem wksht.Name
Next
Nun würde ich gerne ein Standardwert definieren. Ich weiß, dass ich mit formSetup.cboSheetNames.ListIndex = ... die einzelnen Items ansprechen kann, aber wie setze ich das aktive Worksheet als Standard?
Ich vermute, dass ich alle ListItems(.Values) auslesen muss und mit dem ActiveSheet.Name vergleichen muss, aber leider bekomme ich immer wieder einen Fehler.
Vielleicht könnt ihr mir da ja weiterhelfen.
Vielen Dank und Grüße
Steffen
Anzeige