The following code has been used successfully in Excel 2000 for several
years. My company is beginning to transition users to Excel 2003 and
users are calling me to fix errors on several parts of my code. Here
is one example:


With Sheets(datasheet).Range("A1").CurrentRegion
.Offset(, (ReportDataToUseColumnArray(x,
ReportDataColumnInDb)) - 1).Resize(, 1).Copy _
Sheets("Report").Range(startCell).Offset(, x -
omitIndex)
End With


The message is visual basic error #400

To solve the problem, I added some error code "Resume Next" and the
macro runs just fine. Everything that is supposed to be copied, copies
just fine, but without the "Resume Next" the code errors out.

any suggestions?