Habe hier ein Problem mit zwei ComboBoxen. Per Datenbankabfrage lasse ich diese beiden ComboBoxen mit Werten füllen.
With Tabelle1.ComboBox1
.Clear
.ColumnCount = 2
.ColumnWidths = "0;170"
.Style = fmStyleDropDownList
Do While rs.EOF = False
i = i + 1
If IsNull(rs.Fields.Item(0).Value) = False Then
.AddItem rs.Fields.Item(0).Value
.List(i - 1, 1) = rs.Fields.Item(1).Value
End If
'.ListIndex = 0
rs.MoveNext
Loop
End With
Nach diesen "füllen" wird sofort für die jeweilige Box die Funktion für das Ereignis change aufgerufen, was bei mir wegen des aktiven Blatt- und Arbeitsmappenschutzes zu mehreren Fehlern führt. Gibt es eine Möglichkeit, dies zu verhindern?
Gruß
Maik