By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
432,441 Members | 996 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 432,441 IT Pros & Developers. It's quick & easy.

Mass Import

P: 18
Is there any way to import MANY different .xls sheets at once?
Thanks in advance for any help.
Oct 26 '06 #1
Share this Question
Share on Google+
1 Reply


pks00
Expert 100+
P: 280
Loop thru the directory its in

Are they all in one dir?

dim sFile as String

sFile = dir$("C:\myxls\*.xls")
do while sFile <> ""
DoCmd.TransferSpreadsheet acImport, , "tablename", "C:\myxls\" & sFile, True
sFile = Dir
loop
Oct 26 '06 #2

Post your reply

Sign in to post your reply or Sign up for a free account.