It looks like Jon K has a good way to do what you want.
for your future reference you can import excel spreadsheets using the docmd or a macro
DoCmd.TransferSpreadsheet acImport, 8, "the table name you want to put the data in", "Your excel file name"l, False, ""
the false part of the docmd is...