Hey everyone, i am still a beginner using VBA and i have a problem

when i export a table to excel it saves it as a 5.0/95 Workbook
is there anyway to make it output as the current version?

this is my code:

Function funcExport(strTableName, strFileName As String)
On Error GoTo funcExport_Err

    ' Exports list to file
       DoCmd.OutputTo acTable,strTableName, "MicrosoftExcel*.xls)", _
        strFileName, False, "", 0


funcExport_Exit:
    Exit Function

funcExport_Err:
    MsgBox Error$
    Resume funcExport_Exit

End Function

I have also tried "MicrosoftBiff8(*.xls)"

any help would be much appreciated

Try this:

DoCmd.OutputTo acOutputTable, strTableName, acFormatXLS, strFileName

False is the default for AutoStart, so not needed.
Likewise for TemplateFile and Encoding


This should use the version of Office installed on the PC.

Did this help?


mmcdonal

Thanks heaps for the reply, but it doesn't seem to be working
... i mean it all works fine but is still outputting as a 5.0/95 workbook....

would it have anything to do with the file name?

What version of Excel do you have installed on the machine, and what version of Access?


mmcdonal

Both 2002