I'm having the same problem. Here's a sample from the code:
Sub GetIMdata(ByRef webpage As Variant)
Select Case webpage(9, 2)
Case "TO BE SET", "PENDING REVIEW", "PENDING", "INTERSTATE"
IM_data(eos) = "1/1/1900"
Case "SENTENCED TO LIFE"
IM_data(eos) = "12/31/9999"
Case Else
IM_data(eos) = webpage(2, 9)
End Select
i = 999
End Sub
The array IM_data() is a public variable. The subr was working when I passed it a worksheet, but I changed it to an array to increase speed.
The statement ( IM_data(eos) = webpage(2, 9)) never gets executed.
I have another section that loops through the array using for...nexts that does the same thing.
thanks