|
Hallo,
habe in einer Userform einen Button programmiert der die werte von 5 Textboxen in eine ausgewählte Zeile überträgt. Wenn man nochmal auf den Button klickt möchte ich das er die umgeschriebenen Werte in den Textboxen in die Zeile darunter einträgt. Schaffe das aber nicht... Bitte um Hilfe, kriegt die Schleife nicht hin^^
Code:
Dim wks As Worksheet
Dim addnew As Range
Set wks = Tabelle8
Set addnew = wks.Range("A21")
addnew.Offset(0, 0).Value = txt_1.Text
addnew.Offset(0, 1).Value = txt_2.Text
addnew.Offset(0, 2).Value = txt_3.Text
addnew.Offset(0, 3).Value = txt_4.Text
addnew.Offset(0, 4).Value = txt_5.Text
'Startzeile ist 21, bei nochmaligen klicken die neu eingetragenen Werte also in Zeile 22
LG Alex
|