textbox in Userform aktualisieren

Wenn ich in einer Userform in einer Textbox einen Wert habe den ich mit einem Makro letzte Zeile Wert + 1
ausgelesen habe und dieser dann in der Textbox steht, wie bringe ich den Wert nach dem Eintragen in das Formular dazu, sich dementsprechend zu aktualisieren ohne Excel zu beenden und wieder neu zu starten.

Dim i
i= cells(Rows.Count,1).End(xlUp).value
TextBox1.Text = i + 1

Das gleiche Problem habe ich mit einem Optionbutton. Wie fuktioniert das, das nach dem Eintragen der Werte, die Optionsbox nicht mehr markiert ist.