Wie geht das?
Bin echt am verzweifeln!!!!!
Private Sub ComboBox1_GotFocus()
With ComboBox1
.AddItem "Text 1"
.AddItem "Text 2"
End With
End Sub
Private Sub ComboBox1_GotFocus()
With ComboBox1
.AddItem "Text 1" 'das hier ist der erste eintrag in der box
.AddItem "Text 2" 'das hier ist der zweite eintrag in der box... usw. usw.
End With
End Sub
Private Sub ComboBox1_GotFocus()
Tabelle1.ComboBox1.RowSource=Range("A1:A10")
End Sub
Private Sub ComboBox1_GotFocus()
combobox1.clear
Tabelle1.ComboBox1.RowSource=Range("A1:A10")
End Sub