ich benötige wieder einmal eure Hilfe.
Ich habe in der Tabelle2 eine Auflistung von Werten mit Formel.
Überschrift: Summen:
Wert in B2: 150 resultiert aus der Formel in B2: =Tabelle1!E2
nur ein Wert als Test sonst mehrere.
Nun soll in einer UF die Combobox1 mit den Werten aus der Spalte gefüllt werden.
Mein Code hierzu:
~f
Private Sub UserForm_Initialize()
Dim Z4 As Long 'benötigt für ComboBox4
'Anfang Combobox1
Z1 = Worksheets("Tabelle2").Cells(Rows.Count, 2).End(xlUp).Row
With ComboBox1
.ColumnCount = 1
.ColumnWidths = "3cm"
.RowSource = "Tabelle2!B2:B" & Z1
End With
'Ende Combobox1
End Sub
~f
Wie kann ich die Formel bei Auswahl in Combobox1 in Zelle C2 der Tabelle3 übertragen?
Besten Dank für eure Hilfe.
Gruss
Peter