Verständnisfrage WorkSheet
24.05.2020 17:17:33
Herbi
irgendwie stehe ich auf der Leitung. In meiner Arbeitsmappe, befinden sich zwei (2) Tabellenblätter, 1 und 2. Auf Tabellenblatt1 rufe ich eine UserForm auf, in der sich die Daten von Tabelle2 befinden sollen. In diese Tabelle2 will ich die Daten speichern. Dies klappt aber nur, wenn ich die UserForm auf Tabellenblatt2 aufrufe. Beim Initialisieren zeigt er mir in der Listbox1 die Daten von Tabelle1.
Was mach ich da nicht richtig bzw. wo habe ich da den Denkfehler?
Sub UF_Aufrufen()
'Ruft EingabeMaske auf
UF_Test.Show
Worksheets("Tabelle2").Range ("A1")
End Sub
Private Sub UserForm_Initialize()
Set rng = Range("A3", Range("A3").CurrentRegion.SpecialCells(xlCellTypeLastCell))
With ListBox1
.ColumnHeads = False
.ColumnCount = rng.Columns.Count
.List = rng.Value
End With
'Datum von
TextBox_Von = "tt.mm.jjjj eingeben"
'Datum bis
TextBox_Bis = "tt.mm.jjjj eingeben"
'Datum von
TextBox_Von_2 = "tt.mm.jjjj eingeben"
'Datum bis
TextBox_Bis_2 = "tt.mm.jjjj eingeben"
End Sub