Pb d'activation des macros d' 1 fichier excel à partir d'une ouverture d'access

  • Initiateur de la discussion Fred
  • Date de début
F

Fred

Guest
Bonjour à tous,

J'ai une base de données Access 2000 dans la quelle je dois récupérer des valeurs qui sont obtenues suite à l'exécution d'une macro sous excel 2000.

Actuellement, j'arrive à ouvrir le fichier excel à partir d'un code vba mais la macro semble être inactive. Si j'ouvre le fichier excel "à la main", la macro s'exécute normalement.

J'ai essayé d'ouvrir ce fichier excel à partir d'Access, et de faire éxécuter la macro, mais sans succès, soit d'après le code VBA, soit directement sur la feuille excel.

Exemple du code VBA sous acces:
Dim Oxlapp As Object
Set Oxlapp = CreateObject("Excel.Application")
With Oxlapp
.Visible = False
.Workbooks.Open ("c:\fichier.xls")
.worksheets("Averages").Cells(5, 2) = 2
.worksheets("Averages").Cells(6, 2) = 3
.Run ("MacroExcel")
end with
'Sur le fichier excel ouvert par un simple clic, le fait de modifier l'une des 2 cellules entraine l'exécution de la macro.

Il y a t-il une façon précise d'ouvrir un fichier excel pour que ces macros restent opérationnelles ?

Merci d'avance
@+
Fred
 
R

Ronan

Guest
Bonsoir,

Il faut rajouter la méthode RunAutoMacros

.RunAutoMacros(xlAutoOpen) 'macros Auto_Open
.RunAutoMacros(xlAutoClose) 'macros Auto_Close
.RunAutoMacros(xlAutoActivate) 'macros Auto_Activate
.RunAutoMacros(xlAutoDeactivate) 'macros Auto_Deactivate

@+

Ronan
 

Discussions similaires

Statistiques des forums

Discussions
314 634
Messages
2 111 445
Membres
111 138
dernier inscrit
Gsx31