Chiligoldva
New Member
- Joined
- Feb 6, 2004
- Messages
- 7
Code:
:banghead: I simply am at my wits end on this one. I am using XP and I have opened an Excel spreadsheet through Access to update.
Dim objxl as object
dim objxl_book as object
dim objxl_sheet as object
set objxl = create object ("Excel.application")
objxl.visible = true
set objxl_book = objxl.workbooks.open("path\foldername\sheetname.xls")
set objxl_sheet = objxl_book.worksheets("Nameofsheet")
blah blah blah to transfer the data from the tables in Access to Excel sheet.
blah blah blah........etc.
at the end
objxl_book.save
dim bkrupwrkbook
dim fso = createobject("scripting.fileSystemObject")
bkupwrkbook = "path\folder\nameoffile"
fso.copyfile "path\folder\sheetname, bkupwrkbook, true
set objxl_sheet = nothing
set objxl_book = nothing
objxl.quit
set objxl = nothing
when I open the task list to see if Excel has been released from the process tab
, it's still there!!! What the heck am I doing wrong? Can anyone help me? :pray: Thank you kind people.....I really need some insite. Chiligoldva