I hope somebody will be able to help with this. The code below cause
Excel to crash using version '97 but runs fine with Excel 2000.

For j = IIf(updateFrom 52, updateFrom, 53) To updateTo
Cells(r, j - 44).Value
IIf(IsNull(rstProductData.Fields(j).Value), 0
rstProductData.Fields(j).Value)
Next j

It executes this code (which precedes it) without any problems:

For j = updateFrom To IIf(updateTo 52, 52, updateTo)
Cells(r, j + 8).Value
IIf(IsNull(rstProductData.Fields(j).Value), 0
rstProductData.Fields(j).Value)
Next j

I'm not sure what further details are needed to diagnose the problem s
please let me know.

Thanks for any help

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