Moin moin,

ich mache:

Private Sub UserForm_Initialize()
tbVE.Text = Worksheets("datenOutput").Range("x2").Value
tbVE.SetFocus

Dim chk As String
chk_tbVE = tbVE
MsgBox chk_tbVE & tbVE
End Sub

und will dann schauen ob die Textbox beim verlassen anders aussieht als sie geladen wurde:

Private Sub tbVE_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If tbVE = chk_tbVE Then
MsgBox "ERR"
End If
MsgBox "" & tbVE & chk_tbVE
End Sub

MsgBox habe ich mal zum Test eingefügt, es ist beides das gleiche aber MsgBox "Err" kommt nicht.

Was mach ich falsch?

VG Ray