We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Private Sub Command12_Click() DoCmd.SetWarnings False exportToXl ("Booking Override Query") exportToXl ("Shipping Override Query") DoCmd.SetWarnings True MsgBox "Successfully Exported to M:\Automated Planning Reporting" End Sub Sub exportToXl(QueryName As String) Dim dbTable As String Dim xlWorksheetPath As String xlWorksheetPath = "M:\Automated Planning Reporting\" xlWorksheetPath = xlWorksheetPath & "Export_Ship " & Format(Date, "MM-dd-yyyy") & ".xlsx" DoCmd.TransferSpreadsheet acExport, 10, QueryName, xlWorksheetPath, True End Sub '- See more at: http://www.askeygeek.com/vba-code-to-export-access-data-to-excel/#sthash.pK0862gD.dpuf
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Counting Timer - Up and Down||26||66|
|Pasting files from the clipboard (via Microsoft Access / VBA)||14||24|
|How to I read text a text box using code in another form?||9||28|
|Would like to change date on excel||6||19|