Range.Find abend on XP/Excel 2003
Below code got subscript out of range abend on XP/Excel 2003, but works find
on excel 2000. Does range.Find function not working on Excel 2003? Any
suggestion?
oriReportStartRow = oriRowIndex + oriBlankLine + oriHeaderLine + oriTOTALLine
oriGPStart = oriReportStartRow
objSheet(orisheet).Cells(oriReportStartRow - 1, 1) = "Gross Profit"
objSheet(orisheet).Cells(oriReportStartRow - 1, 1).Font.Bold = True
oriRowIndex = oriReportStartRow
'test find statement
Dim oriSearch As Range
Set oriSearch = objSheet(orisheet).Range("A2:IV100").Find("Gross
Profit", LookIn:=xlValue) ---- Abend subscript out of range???
|