Exporting from Access to Excel (Docmd.Transferspreadsheet) in a live window
Posted on 2004-03-24
I have employed the code for the docmd.transferspreadsheet (thanks Nico).
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "qryMASTER_Temp", "C:\ListExport.xls"
However, instead of exporting and saving to the C:\ListExport.xls, I would like to export to a live window (I know how to open a live window in excel)
Dim oApp As Object
Set oApp = CreateObject("Excel.Application")
oApp.Visible = True
'Only XL 97 supports UserControl Property
On Error Resume Next
oApp.UserControl = True
Any suggestions on how to export in the window?