Hallo...
Habe ein Problem mit einer Combobox...
Und zwar möchte ich mehr als nur ein Wert in die Combobox füllen. Leider bringe ich das nicht feritg!! habe probiert nach formula1 einfach formula2 anzufügen. Funktioniert ohne fehlermeldung doch in der box steht immer noch nur Aarau. Die combobox wird nur erstellt wenn in einer Datenbank mehr Werte gefunden werden als einer! Deswegen muss dass ganze Dynamisch sein!
Gibts da was besseres oder mache ich einfach etwas falsch??
Hier der Code:
Sub erstelleliste(daten As ADODB.Recordset)
Range("A2").Select
With Selection.Validation
.Delete
.Add Type:=3, AlertStyle:=1, Operator:=1, Formula1:="Aarau"
.IgnoreBlank = True
.InCellDropdown = True
.ErrorTitle = "Eingabefehler"
.ErrorMessage = "Wählen Sie einen Wert aus dem Zelldropdown."
.ShowError = True
End With
End Sub
Danke für eure Hilfe!!
|