ich möchte gerade ein Userform erstellen, dass mir die werte die ich über mehrere Textboxen eingebe, in die letzte freie Zeile einträgt. Mit VBA kenn ich mich leider gar nicht aus. Zwar klappt das eintragen per Userform, aber wo und wie ich den Code produzieren und einbinden muss, um die letzte freie Zeile des Tabellenblattes zu befüllen, ist mir derzeit noch schleierhaft :-)
Code bisher:
Private Sub TextBox1_Change()
Sheets("Tabelle1").Range("A2").Value = TextBox1.Text
End Sub
Private Sub TextBox2_Change()
Sheets("Tabelle1").Range("B2").Value = TextBox2.Text
End Sub
Private Sub TextBox3_Change()
Sheets("Tabelle1").Range("C2").Value = TextBox3.Text
End Sub
Damit wird natürlich bei jeder neuen Eingabe, der vorige Wert überschrieben...und das solle es ja gerade eben nicht. Ich denke, dass ich für RANGE eine variable festlegen muss....aber wie das genau auszusehen hat, dafür fehlt mir schlichtweg das entsprechende VBA-Wissen.
Hat jemand vielleicht nen Tip?
THX4URHelp
Hans