ich wollte gern den Inhalt von 3 TextBoxen in einer Userform sofort aktualisieren lassen, ohne die Userform neu starten zu müssen.
Wie könnte da ein Code dafür aussehen? Wo müsste dieser hin?
Hätte vieleicht an "Änderung in Tabelle1" oder auch schon bei "Maus links klicken" oder gern etwas anderes gedacht.
Es handelt sich um die UserForm2 mit den TextBoxen1 bis 3.
Private Sub UserForm_Activate()
''Sicherstellung bei Start Userform2 das Blatt ("Tabelle1").aktiviert wird
Worksheets("Tabelle1").Activate
''Startposition Userform
Me.Left = 800
Me.Top = 200
''Copy der aktiven Zeile in "Userform1 in Textboxen "
UserForm2.TextBox1 = Worksheets("Tabelle1").Cells(ActiveCell.Row, 3).Value
UserForm2.TextBox2 = Worksheets("Tabelle1").Cells(ActiveCell.Row, 1).Value
UserForm2.TextBox3 = Worksheets("Tabelle1").Cells(ActiveCell.Row, 2).Value
End Sub
Grüße Leon