Dropdownliste in ausgewählte Zelle
06.11.2017 10:42:04
Lorenz
ich hab das Problem, dass ich über einen Button eine Dropdownliste in eine vorher ausgewählte Zelle einfüge. Üben den Makrorekorder und ein bisschen rumgebastle habe ich folgendes bekommen, was leider jedoch nicht funktioniert:
Sub Makro1()
Range(ActiveCell.Offset(1, 1), ActiveCell.Offset(1, 6)).Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=Indirekt(Mitarbeiterverzeichnis!A2)"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
End Sub
Würde mich sehr freuen, wenn ihr mir weiterhelfen könnt =)
Viele Grüße
Lorenz
Anzeige