When I run:

Sub RunMyForm()
Load UserForm1
UserForm1.Show
End Sub

Private Sub UserForm_Initialize()
txtCurrTotal.Text =
Format(Application.Sum(Worksheets("Sheet1").Range( "B3:C6")), "$0,000.00")
End Sub

$3,996.00 appears in the textbox, JUSTing hanging there..
With cursor within the Textbox (having not exited).

How can I get it to proceed with say a message that says,,
Is this OK? Yes No

TIA,