Converting Range.value(error)

  • Thread starter Thread starter vikrampn
  • Start date Start date
V

vikrampn

Could some one tell me if this is correct. I am getting a run Time
error on the second line


Dim intNumOfProducts as Integer

intNumOfProducts = CInt(Range("B1").Value)
 
It looks ok to me, but what's in B1?

maybe:

If IsNumeric(Range("b1").Value) Then
intnumofproducts = CInt(Range("b1").Value)
Else
MsgBox "It's not a number! " & Range("b1").Value
End If
 
Back
Top