Odd VBA error

[Mr930]

I added the following code to an existing VBA subroutine (which worked fine) and I get a type mismatch error:

If (GOR1 = GOR2) Then
For i = 0 To Denom
Range("VOL8_GOR")(i, 1) = Range("Vol8_P2")(i, 1) * GOR1 <- on this line
Next i
Exit Sub
End If

GOR1, GOR2 are doubles. i is an integer. Denom is an integer.
I use this line later on with no trouble:
Range("VOL8_GOR")(i, 1) = Range("VOL8_GOR")(i, 1) * Range("Vol8_P2")(i, 1)

Any ideas why I would get this error?

thanks
Fred Emmerich

 

[Joe4]

What are the values of:
GOR1
GOR2
Denom

What are "VOL8_GOR" and "Vol8_P2"?
Are they named ranges?
If so, what ranges are assigned to them?

 

[Marcelo Branco]

Maybe

For i=1 to Denom

M.

 

[Mr930]

Thats was it. Reverting to my old C++ style...