Daten aus Textfeldern in Arbeitsblätter schreiben
13.04.2019 19:40:54
Michael
ich möchte in UserForm Daten aus drei Textfeldern in Arbeitsblatt schreiben.
Dies habe ich mit dem Code umgesetzt, soweit so gut.
Ich möchte aber die Daten in ein Arbeitsblatt reinschreiben , das ich vorher aus einer Combobox ausgewählt habe.
In der Combobox habe ich Tabelle1, Tabelle2...usw. bis Tabelle5
Könnt ihr mir da weiter helfen ?
Besten Dank.
Dim z As Long
z = Cells(Rows.Count, 1).End(xlUp).Row + 1
Worksheets("Tabelle1").Cells(z, 3) = Me.txtDatum.Value
Worksheets("Tabelle1").Cells(z, 1) = Me.txtName.Value
Worksheets("Tabelle1").Cells(z, 2) = Me.txtVorname.Value
Anzeige