Reading an Excel worksheet by variable

[AOLBoy]

I am accessing an MS Excel file and wish to position on a specific worksheet using a variable.

this is my code:
***********************************
Dim ExcelApp As Excel.Application
Dim ExcelWorkbook As Excel.Workbook
Dim ExcelSheet As Excel.Worksheet

Set ExcelApp = CreateObject("Excel.Application")
Set ExcelWorkbook = ExcelApp.Workbooks.Open(FN)
Set ExcelSheet = ExcelWorkbook.Worksheets(WS)
********************************

FN contains the pathname and filename of the excel file
WS contains the name of the worksheet

I can't seem to access the worksheet in this manner. I get a subscript out of range error.

Can anybody help me please?

 

[SkipVought]

Hi,

"I get a subscript out of range error."

On what statement? Please post.


Skip,
[sub]
[red][/red]
[/sub]

 

[RonRepp]

Where does your filename and sheetname come in?

Ron Repp

If gray hair is a sign of wisdom, then I'm a genius.

 

[AOLBoy]

Sorry folks, this was a red herring. I have resolved my problem - the code above worked, the error I was getting referred to me trying to access a non-existent cell in the worksheet.