I want to use cell numerical values from a spreadsheet in a program i
V.B.


Dim value1 As Integer
Dim value2 As Integer
Dim value3 As Integer


value1 = CInt(Worksheets("sheet2").Range("B15"))
value2 = CInt(Worksheets("sheet2").Range("B16"))
value3 = CInt(Worksheets("sheet2").Range("B17"))

If Abs(value1 - value2) <= 0.001 Then
value3 = Rnd() * 0.007

I get a type mismatch error because i am trying to do a math operato
with a worksheets("sheetx").Range("x") value which i think VB think
these are srings and not intergers. Will CInt work for my purpose o
no? Also is my syntax right for calling a cel
(Worrksheets("sheet2").Range("B15"))?
-Mar

--
Message posted from http://www.ExcelForum.com