ich möchte per VBA einer Zelle eine Gültigkeit zuweisen, und zwar eine Liste von Werten, die dann per Dropdown ausgewählt werden können.
Um den hierzu notwendigen Code zu erhalten, habe ich die Gültigkeit manuell zugewiesen und per Makrorekorder aufzeichnen lassen. Dabei habe ich als Kriterien "Liste" und in die Zeile Quelle "1;2;3;4;5;6" eingegeben (ohne Anführungszeichen).
Die Gültigkeit funktioniert auch, der Rekorder hat folgenden Code aufgezeichnet:
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="2;3;4;5"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
Lasse ich nun dieses Makro unverändert in einer anderen Zelle laufen, dann wird die Gültigkeit zwar übernommen. Die Dropdownliste enthält aber nicht die sechs Werte von 1 bis 6, sondern eine einzige Zeile 1;2;3;4;5;6.Was mache ich (oder der Makrorekorder) falsch?
Danke für eure Hilfe!
Gruß, André