worksheet opening problem

[AlexD]

I’m trying to do the following:
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet

Set xlApp = CreateObject("Excel.Application")

Set xlBook = xlApp.Workbooks.Open("WorkBookName")

Set xlSheet = xlBook.Worksheets("WorkSheetName")

xlSheet.Visible = xlSheetVisible

But, I cannot make the spreadsheet visible (to open and
see it).

Can anybody help me with it?

Thanks

 

[Dave Jones]

Replace:
xlSheet.Visible = xlSheetVisible
With
xlApp.Visible=true

Dave

 

[AlexD]

Thanks a lot, Dave.

-----Original Message-----
Replace:
xlSheet.Visible = xlSheetVisible
With
xlApp.Visible=true

Dave
.

 

[TC]

You haven't made >Excel< visible!

Try: xlApp.visible = true

HTH,
TC