Hello all,
I am pretty much a rookie but thanks to all of the great resources in
this site I am progessing even if slowly. I am using excel 2003 SP2.
I would like to have three formatted text boxes add. Here is my current
code:

If IsNumeric(txtadmingross.Text) Then
txtadmingross.Text = Format(txtadmingross.Text, "#,##0")
txtTotalGross = Format(Val(txtGross.Text) + Val(txtFI.Text) _
+ Val(txtadmingross.Text), "$#,##0")
Else
MsgBox "Entry must be numeric", vbInformation, "Invalid Entry"
txtadmingross.Text = ""
End If

My problem is that I would like to display the text in txtadmingross
formatted as "$#,##0" as soon as I make this change it no longer adds.
Is this possible? Can I have each of the three text boxes formatted as
currency, at the time of entry (as well as the result) and still have
them add? What am I missing?
Any suggestions would be greatly appreciated.
Terry