Home/ Questions/Q 105787
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-05-11T01:29:39+00:00

I am trying to use the following code to export tables from access to

  • 0

I am trying to use the following code to export tables from access to excel

I am getting error object does not support property or method at the end

 Set objexcel = New Excel.Application    objexcel.Visible = True     If Dir('C:\reports\Data_Analysis1.xls') = '' Then    objexcel.Workbooks.Add    Set wbexcel = objexcel.ActiveWorkbook    Set objSht = wbexcel.Worksheets('Sheet1')    Else    Set wbexcel = objexcel.Workbooks.Open('C:\Documents and Settings\TAYYAPP\Desktop\test folder\reports\ERROR REPORT4.xls')    Set objSht = wbexcel.Worksheets('Sheet1')    End If     objSht.Activate      objexcel.DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, 'UTYP_Anzahl', 'C:\Reports\Data_Analysis1.xls', True
Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. DoCmd as in ‘DoCmd.TransferSpreadsheet’ is an MS Access command, not an excel command. I think that is your problem.

    If this VBA is running inside MS Access then just refer to it as

    DoCmd.TransferSpreadsheet

    Not

    objexcel.DoCmd.TransferSpreadsheet

    Also, if that is what you’re doing, you don’t need to manually create an excel file with Execl Automation, Access will do that for you.

    Apologies if I have misunderstood what you’re doing, but I think all you need is the TransferSpreadSheet command.

    • 0