Ich will Werte aus einer Combobox in eine beliebige aktive Zelle übertragen,
geht das?
Also ich will auswählen aus Steuerelement und will, dass das Ergebnis in eine beliebige, zuvor aktivierte Zelle übertragen wird
ActiveCell.Value = Combobox1.Value
Er schreibt in die zuvor aktivierte Zelle den Wert aus der ComboBox (in diesem Fall ist es ComboBox1)Private Sub ComboBox1_Change()
Selection.Value = ComboBox1.Text
End Sub
So sollte es korrekt sein
Private Sub ComboBox1_Change()
ActiveCell.value = ComboBox1.value
End Sub
Grüße, Bernd
Private Sub ComboBox1_Click()
ActiveCell = ComboBox1 ' oder Range("C5")=ComboBox1 oder Cells(5,3)=ComboBox1
End Sub