ich durchsuche per Textbox11 in einer UserForm Werte einer Tabelle in den Spalten B-E, die dann in den TextBoxen 1-10 derselben UserForm dargestellt werden.
Das klappt auch bestens, aber...
Nun möchte ich einen Wert ändern (zB. den Namen bei Heirat, Ort bei Umzug etc.) und den geänderten Wert dann wieder in die Zeile zurückschreiben, aus der der Wert gesucht wurde.
Wie kann ich das verwirklichen?
Der folgende Code schreibt in die nächste freie Zeile und nicht in die Zeile, der der Wert entnommen wurde.
Vielleicht hat jemand einen Tip und kann den Code umbasteln?!
Danke für eure Hilfe!
Grüsse, Heiner
Private Sub CommandButton5_Click()
Dim intZ As Integer
intZ = Range("C65536").End(xlUp).Row + 1
Cells(intZ, 3) = TextBox2 ' Anrede
Cells(intZ, 4) = TextBox3 ' Bezeichnung
Cells(intZ, 5) = TextBox4 ' Name
Cells(intZ, 6) = TextBox5 ' Vorname
Cells(intZ, 7) = TextBox6 ' Strasse, Postfach, Nr
Cells(intZ, 8) = TextBox7 ' Plz
Cells(intZ, 9) = TextBox8 ' Ort
Cells(intZ, 10) = TextBox9 ' Länderkürzel
Cells(intZ, 11) = TextBox10 ' Telefon
TextBox11.SetFocus
End Sub