Hi Ron,
try

If IsNumeric(Me.TxtI1.Value) _
And IsNumeric(Me.Txt2.Value) _
And IsNumeric(Me.Txt3.Value) Then
Me.TxtGrossRevenue.Value = CDbl(Me.Txt1.Value) _
+ CDbl(Me.Txt2.Value) _
+ CDbl(Me.Txt3.Value)

Hope this help

"ron mann" wrote:

In my userform I have four text boxes. I need to total the value of the first
three text boxes into the forth text box on a change event in any of the
first three text boxes. The values are all currency to two decimal places.

I have done a bit of reading on this but simply can not crack the answer.

Any assistance with the code to do this would be greatly appreciated.

--
Thanks

Ron