View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Pam Pam is offline
external usenet poster
 
Posts: 128
Default calculate vba userform type mismatch when decimal is entered

I have a vba userform that I want to calculate fields.
I have a quantity, unit price, and want the calculation to be in the
extended price field.
I'm using the following code, and it works great, as long as you use a
number not starting with a decimal. ie.. I can input 1 x 1.50 and it works,
or I can enter 1 x 0.50 and it works, but if I enter 1 x .5 it errors out as
a type mismatch.
What am I doing wrong?
Thank you

Private Sub Txtitemunit1_Change()
If Me.TxtItemQty1.Value < "" Then
Me.TxtItemExt1.Value = Me.TxtItemUnit1.Value * Me.TxtItemQty1.Value
End If
End Sub