ich habe follgendes Problem und würde mich auf Hilfe freuen.
Ich habe ein Userform erstellt das mit dem folgenden Code, Daten in eine Tabelle übertragen soll.
Das Problem ist das der erste Datensatz angezeigt wird, der 2. auch, der 3.Eintrag überschreibt jedoch den 2. Eintrag...liegt es daran, dass Sprünge in den Spalten sind und damit die Schleife nicht richtig funktioniert (z,11-z,14...hier sind in den Zellen Formeln die die Eingaben verarbeiten sollen)
Der Code klappt eigentlich, aber nur bei Zellen die nacheinander abgefragt werden.
Private Sub CommandButton1_Click()
z = Range("A6").End(xlDown).Row + 1
If z > 65000 Then z = 7
Tabelle5.Cells(z, 1) = TextBox1
Tabelle5.Cells(z, 2) = TextBox2
Tabelle5.Cells(z, 3) = CDate(TextBox3)
Tabelle5.Cells(z, 4) = TextBox4
Tabelle5.Cells(z, 5) = TextBox5
Tabelle5.Cells(z, 6) = CDate(TextBox6)
Tabelle5.Cells(z, 7) = CDate(TextBox7)
Tabelle5.Cells(z, 8) = CDate(TextBox8)
Tabelle5.Cells(z, 9) = TextBox9
Tabelle5.Cells(z, 10) = TextBox10
Tabelle5.Cells(z, 11) = TextBox11
Tabelle5.Cells(z, 14) = TextBox12
Tabelle5.Cells(z, 16) = TextBox13
Tabelle5.Cells(z, 17) = TextBox14
Tabelle5.Cells(z, 18) = TextBox15
Tabelle5.Cells(z, 19) = TextBox16
Tabelle5.Cells(z, 21) = TextBox17
Tabelle5.Cells(z, 23) = TextBox18
Tabelle5.Cells(z, 24) = TextBox19
Tabelle5.Cells(z, 28) = TextBox20
End Sub
Vielen Dank im Vorraus
ARC