Can you Open Microsoft Excel and a spreadsheet file with VB?

[dlingo]

I have used the following code to open Access, export a table into an Excel spreadsheet, and close Access:

Dim ac As Access.Application
Set ac=New Access.Application
ac.OpenCurrentDatabase ("c:\reports.mdb&quot
ac.DoCmd.TransferSpreadsheet acExport, 8, "TEMP_STAT", "c:\moduletest.xls", False
ac.CloseCurrentDatabase

Is there a way to open Excel with the newly created spreadsheet?

 

[Amadom]

dlingo,
you can shell excel in your system. like this

tt = Shell("D:\Program Files\Microsoft Office\Office\excel.exe c:\Whatever.xls", vbMaximizedFocus)

this will open c:\Whatever.xls as excel is opened
you have to put the path of excel.exe as it is in your system.
cheers

 

[dsi]

If you want to use the Excel object library

Dim xlApp as Excel.Application

Set xlApp = New Excel.Application
Workbooks.Open FileName:="C:\YourPath\YourFile.xls"
Workbooks.Application.Visible = True