Private Sub startet nicht!
20.01.2009 16:04:00
Christoph
Ich bastle derzeit an einer Arbeitsmappe und nun würde ich gerne einige ComboBoxen bei Dateistart mit Inhalten füllen.
Das Workbook_Open-Sub liegt, genau wie die Private-Subs in "Diese Arbeitsmappe", nach dem Start erhalte ich aber schon bei der ersten Box die Fehlermeldung "Objekt erforderlich" (fett gedruckte Zeile)! Kann mir jemand evtl sagen, was ich falsch mache?!
Private Sub Workbook_open()
ComboBox1_Change
ComboBox2_Change
ComboBox3_Change
ComboBox4_Change
ComboBox5_Change
ComboBox6_Change
End Sub
'Auswahl des Standards auf dem Tabellenblatt "Gesamtübersicht"
Private Sub ComboBox1_Change()
ComboBox1.List = Worksheets("VE-Liste").Range("P4", "P" & Worksheets("VE-Liste").Range(" _
_
P15").End(xlUp).Row).Value
Stand = ComboBox1.Value
If Stand = "4" Then...
Danke schonmal!