Guten Morgen
Also ich habe jetzt innerhalb des Moduls folgendes:
Public Sub()
Bla Bla Bla
End Sub
_____________________________
Public Sub DropDownListe1()
Worksheets("Tabelle1").Select
Range("S28").Select
ActiveCell.Validation.Delete
ActiveCell.Validation.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Formula1:="In,Out"
End Sub
_____________________________
Public Sub DropDownListe2()
Worksheets("Tabelle1").Range("S28").Validation.Delete
Worksheets("Tabelle1").Range("S28").Validation.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Formula1:="A,B,C,D,E"
End Sub
Ein DropDown-Auswahlfeld wird zwar in S28 erstellt, jedoch ohne die Auswahlparameter A-E.
Woran kann das liegen?
|