Faire executer une commande Access depuis Excel
L
Bonjour.
J'ai besoin de faire rouler une commande qui se trouve à l'intérieur d'une MDB à partir d'excel.
J'ai besoin du format Access car il s'agit d'un fichier GIS qui est lier au fichier Xslx. Donc les utilisateurs mettent à jour le fichier XSLX et dans access j'ai une macro qui met à
jour le fichier SIG.
Merci de votre aide.
Voici mon code:
Dim A As Object
Set A = CreateObject("Acces.application")
A.Visible = False
A.OpenCurrentDatabase ("G:\Environnement\SIG - GIS\Eau souterrainne\Piezometre.mdb")
A.DoCMD.runmacro "Autoexec"
A.CloseCurrentdatabse
A.Quit
Set A = Nothing
J'ai un message d'erreur de compilation.
MErci de m'aider
Invité
Bonjour
L'erreur est là je pense
Set A = CreateObject("Acces.application")c'est "Access" avec 2 S et non "Acces" avec un seul
@+