For those after me converting A97 into A2003 and running into the same
problems....
Given recordset with fields: ExcelWorkSheetName, ExcelRangeName
The following With ... End With runs in A97 but fails in A2003
A97 - OK
=======
With ObjExcel.Worksheets(!ExcelWorkSheetName).Range(!Ex celRangeName)
..
..
..
End With
A2003 - Error: Type Mismatch
=================
Same as above
Solution
======
Add: .Value
With ObjExcel.Worksheets(!ExcelWorkSheetName.Value).Ran ge(!
ExcelRangeName.Value)
..
..
..
End With
(Cindy: your valued explanation and additions please...)