Per caricare excel da access in un pulsante fai eseguire:
cancellazione tabella sul file di supporto
On Error Resume Next
Dim db As DAO.Database
Set db = DBEngine.Workspaces(0).OpenDatabase(CurrentProject.Path + "\nomefilesupporto.accdb")
db.TableDefs.Delete "nometabella"
db.Close
Set db = Nothing
ricrei la suddetta tabella con i dati aggiornati
docmd.RunSQL (vedi guida)
e poi carichi excel
dim stappname as string
stAppName = "excel.exe " + CurrentProject.Path + "\file.xlsm"
Call Shell(stAppName, 1)
nb:
file di supporto e file in uso devono essere in stesso percorso;
percorso deve essere senza spazi... (altrimenti bisogna fare una variante al codice)