Dropdown befüllen
02.07.2003 10:25:51
Marcus
ein in ein Worksheet eingebettetes Dropdown soll aus der Spalte eines anderen Blattes befüllt werden - und zwar beim Öffnen des Workbooks:
Private Sub Workbook_Open()
With Worksheets("Pflege").ComboBoxFahrzeug
.Clear
Worksheets("Stammdaten").Activate
Range("D2").Select
Do Until ActiveCell.Value = ""
.AddItem ActiveCell.Value
ActiveCell.Offset(1, 0).Select
Loop
End With
End Sub
...Hat jemand einen heissen Tipp was ich falsch mache?
Das Workbook öffnet sauber mit einem leeren Dropdown...
Vielen Dank schonmal!!
Marcus
Anzeige