Help putting multiple reports into one spreadsheet

[Angela 'Angel' Brown]

Please can someone help me with the code to get 3 reports into one xls
spreadsheet.

I've managed to get the code to get one report into a spreadsheet. Or many
queries/tables into a spreadsheet. but not many reports into one spreadsheet.
It doesn't matter if they are in different tabs in the xls spreadsheet or not.

Please help!!

Thanks

 

[scubadiver]

I have added an extra piece to include the year and time in the file name
(just FYI).

You can have as many TransferSpreadsheet codes as you like.



Dim sToday As String

sToday = Format(Now, "yyyy.mm.dd hh.mm")

DoCmd.TransferSpreadsheet acExport, _
acSpreadsheetTypeExcel9, "QUERY NAME", _
"C:\DIR LOCATION - " & sToday & ".xls", True, "SHEET NAME"