MS Access 2013: Export Multiple Access Tables to Same Excel Spreadsheet (Multiple Sheets)

MS Access 2013:  I have a database with 6 tables.  It would be very useful to me if I could get a code that, upon the click of a Control Button (Command15), would automatically export each of these tables to an MS Excel Spreadsheet (each Table is placed into a separate sheet).  Attached is my Database and the 6 tables I would like exported are:

InputT1
InputT2
SentenceOptionT1
SentenceOptionT2
NotesT1
NotesT2

The Excel Spreadsheet (Path) is:  
C:\Users\Matt\Desktop\Access Table Dump.xlsx

Can anyone help with this one?
Big-Test.accdb
mdstallaAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

Hamed NasrRetired IT ProfessionalCommented:
Try: This command for Office 2013.

Excel file: D:\xl.xlsx
Use sheet names not present in workbook.

CurrentDb.Execute "SELECT * INTO [Excel 12.0;DATABASE=" _
    & "D:\xl.xlsx" & "].[" & "InputT1" & "] FROM [" & "InputT1" & "]"

Repeat for other tables.

Access reported error when appending.

Check database.
Big-Test-1.accdb

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
Rey Obrero (Capricorn1)Commented:
using a click event of a button

private sub cdmExport_click()

docmd.transferspreadsheet acexport,10, "InputT1", "C:\Users\Matt\Desktop\Access Table Dump.xlsx", True, "InputT1"

docmd.transferspreadsheet acexport,10, "InputT2", "C:\Users\Matt\Desktop\Access Table Dump.xlsx", True, "InputT2"

docmd.transferspreadsheet acexport,10, "SentenceOptionT1", "C:\Users\Matt\Desktop\Access Table Dump.xlsx", True, "SentenceOptionT1"

docmd.transferspreadsheet acexport,10, "SentenceOptionT2", "C:\Users\Matt\Desktop\Access Table Dump.xlsx", True, "SentenceOptionT2"

docmd.transferspreadsheet acexport,10, "NotesT1", "C:\Users\Matt\Desktop\Access Table Dump.xlsx", True, "NotesT1"

docmd.transferspreadsheet acexport,10, "NotesT2", "C:\Users\Matt\Desktop\Access Table Dump.xlsx", True, "NotesT2"


end sub
mdstallaAuthor Commented:
Capricorn1.  Your codes did not work.

Hnasr:  You codes worked-- however, I would like it if every time Access Exports data to that Spreadsheet, it replaces any/all data that my already exist (say, from a previous export).

Could you take a look at it and adjust your coding?  You are the MAN!
Get Blueprints for Increased Customer Retention

The IT Service Excellence Tool Kit has best practices to keep your clients happy and business booming. Inside, you’ll find everything you need to increase client satisfaction and retention, become more competitive, and increase your overall success.

Rey Obrero (Capricorn1)Commented:
@ mdstalla

what did not work ? what is the problem?
Hamed NasrRetired IT ProfessionalCommented:
Try this version:
Added code to delete previous sheets.
Big-Test-2.accdb
mdstallaAuthor Commented:
I don't know... I plugged them in, hit the Control Button, opened the Spreadsheet and; Nada!

Regardless, it ends up that there's some refining to do with the ultimate function I had in mind.  If you've got time and are willing to put up with me; let me ask you this question (related):

I'd still like to do what you were helping me out with before… only, the sheets within Excel cannot be brand new every time.  My spreadsheet (and its sheets) are already made, and any Access exports to them should only re-write data, not create entirely new spreadsheets.

Now here's the real kicker:  Upon exporting from Access to Excel, I would like the layout of Column’s and Rows to be reversed.  Example:  Records exported from Access that would normally be displayed as Column’s:  'A, B, C and D etc.' should show up as Rows in Excel: 1, 2, 3 and 4, etc.
Buddy, if you can give me direction on how to do this; I will give you accolades for the next 3 weeks straight!  Shit, I’ll Western Union you $50!

Thanks.
Hamed NasrRetired IT ProfessionalCommented:
For the new requirement, you need to start a new question.
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Microsoft Applications

From novice to tech pro — start learning today.