Listbox füllen mit daten aus nicht aktiver Tabelle
01.06.2016 08:57:09
baschti007
Ich würde gerne hier mit meine Listbox in der UF füllen nur befinde ich mich nicht auf dem Tabellenblatt wo die Daten liegen .
Private Sub UserForm_Initialize()
With Worksheets("Tabelle1")
.Range(Cells(1, 1), Cells(Rows.Count, 1).End(xlUp)) = ListBox1.List.Value
.Range(Cells(1, 1), Cells(Rows.Count, 1).End(xlUp)) = ComboBox1.List.Value
End With
End Sub
Gruß Basti