ich steh aufm Schlauch,
ich möchte eine Combobox mit Daten füllen. Bei den Eigenschaften.Rowsource würde ich Personal!a3:b11 eintragen. Beim DropButtonClick Ereignis habe ich folgendes versucht
Private Sub ComboBox18_DropButtonClick()
Zeile = Sheets("Personal").UsedRange.Rows.Count
ComboBox18.RowSource = Sheets("Personal").Range("B2:F" & Zeile)
End Sub
Ich erhalte die Meldung "Datentypen unverträglich!"
Was mache ich falsch? k.A.
Vielen Dank
Mit freundlichen Grüßen
Albrecht