I set up a boolean variable and never used it!

Option Explicit
Dim BlkProc As Boolean
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim myStr As String
if blkproc = true then exit sub
With Me.TextBox1
If IsNumeric(.Value) Then
BlkProc = True
myStr = Format(.Value, "$ ##0.00")
.Value = myStr
Me.Label1.Caption = myStr
BlkProc = False
End If
End With
End Sub

To stop the code from running itself.


<<snipped