EXCEL keeps running in task manager

S

Sam

I've got the following problem:

When I open an excel file from VB6, save it and close it again EXCEL
does not remain in the taskbar, but when I make a copy of a sheet and
save and close the file excel does remain?

Anybody has an idea?

This doesn't work:

Dim XLObj as Public XLObj As Excel.Application
Set XLObj = CreateObject("Excel.Application") XLObj.Workbooks.Open
"c:\test_file.xls"
XLObj.DisplayAlerts = False
XLObj.ActiveWorkbook.Sheets("testsheet").Copy Before:=Sheets(1)
XLObj.ActiveWorkbook.Save
XLObj.ActiveWorkbook.Close
XLObj.UserControl = False
XLObj.DisplayAlerts = True
XLObj.Quit
Set XLObj = Nothing

This works:
Dim XLObj as Public XLObj As Excel.Application
Set XLObj = CreateObject("Excel.Application") XLObj.Workbooks.Open
"c:\test_file.xls"
XLObj.DisplayAlerts = False
XLObj.ActiveWorkbook.Save
XLObj.ActiveWorkbook.Close
XLObj.UserControl = False
XLObj.DisplayAlerts = True
XLObj.Quit
Set XLObj = Nothing
 
J

Jim Cone

Sam,

The first thing I spotted is an unqualified reference to the new sheet.
All references to anything in Excel using automation should be qualified with
the proper parent reference.
Therefore "Before:=Sheets(1)" should read...
Before:=XLObj.ActiveWorkbook.Sheets(1)
Unless this is done, an "orphan" is created and Excel will refuse to quit.

Also, I am curious, are the Set statement and Workbooks.Open statement really on
the same line?

Regards,
Jim Cone
San Francisco, CA

Sam said:
I've got the following problem:

When I open an excel file from VB6, save it and close it again EXCEL
does not remain in the taskbar, but when I make a copy of a sheet and
save and close the file excel does remain?
Anybody has an idea?
This doesn't work:
 
S

Sam Gerene

I'll try it tomorrow... I had read about the orphan "problem" but I
missed the "before" line.

Thanks for the help :) Hope it works

ps: Set XLObj = CreateObject("Excel.Application")
XLObj.Workbooks.Open are indeed on 2 seperate lines!
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top