Discussion :

[stum32]

Bonjour a tous,

J'ai un souci lors de l'ouverture d'un fichier excel par code VBA que je n'ai pas avec d'autres. L'ouverture manuelle du fichier fonctionne sans problème.
J'utilise le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim appexcel As Excel.Application
Dim wbexcel As Excel.Workbook
 
 
Set appexcel = CreateObject("Excel.Application")
appexcel.Visible = True 
appexcel.EnableEvents = True
Set wbexcel = appexcel.Workbooks.Open("Z:\test.xlsm")
appexcel.DisplayAlerts = True
appexcel.ActiveWorkbook.RefreshAll
appexcel.Calculate

Ce code marche avec tous les fichiers hormis avec ce fichier qui contient des requêtes provenant d'une base Access et des graphique et tableaux croisés dynamique issus de ces requêtes. J'ai fait des tests et il s'avère que lorsque je supprime les deux onglets qui contiennent des graphiques (ce sont des rapports) issus de tableaux croisés situés qui sont dans d'autres onglets, Access ouvre le fichier correctement. Avez-vous eu des problèmes semblables? Est-ce une incompatibilité de la méthode 'open' avec les fichiers excel contenant des graphiques de tableaux croisés dynamiques?

Merci de vos réponses.

Bonne journée!

[argyronet]

Bonjour,

Y a t-il un message d'erreur issu de ton code ?
Si oui, lequel...

Argy