Dropdown liste in zelle
manu
vielleicht kann mir jemand von euch helfen. Ich möchte gerne eine dropdown liste mit vba erstellen (also nicht über Gültigkeit...).
Das Problem: folgender code gibt mir keine Liste sondern nur einen Wert nämlich "a1; a2; a3".
Weiß jemand wie ich den code verändern muss um eine Liste (so wie über den Weg Gültigkeit...)
zu bekommen?
Sub Liste()
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:= _
"a1; a2; a3"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
End Sub
Manu