Hallo,
wie du sicher festgestellt hast, funktioniert das mit dem Change-Ereignis nicht, da du nur ein Zeichen eingeben kannst. Nutze statt dessen das Exit-Ereignis:
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
MsgBox Me.TextBox1.Text
Me.TextBox2.Value = Me.TextBox1.Value
End Sub
Die Namen der Textboxen musst du noch auf deine Erfordernisse anpassen.
Gruß
M.O.