Ouverture d'un fichier avec Application.run

Bonjour,

j'ai une macro qui ouvre un fichier, cette macro marche sur plusieurs postes depuis des mois, et il se trouve que depuis quelques jours elle provoque une erreur uniquement sur un poste et de façon systématique.

Citation:

---

erreur d'exécution 1004

---

J'ai beau chercher dans tous les sens je ne vois plus de piste de recherche, voici la macro

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub openCatalPC()   Dim fichCatal As String, pathcatal As String   fichCatal = fich2 & ".xlsm" pathcatal = ThisWorkbook.Path & "\" & fichCatal Application.ScreenUpdating = False   Workbooks.Open pathcatal Application.Run "'" & fichCatal & "'!OpenCatal", ThisWorkbook.Name, "openCatalPC"   End Sub

---

"Application.run" exige-t-il un paramètre dans Excel (qui aurait pu changer) sur le PC où la macro s'exécute ?

J'ai une macro similaire avec :

Code:

---

Application.Run "'" & fichCatal & "'!OpenCatal", ThisWorkbook.Name, "openCatalServeur"

---

bien sur même pb uniquement sur le poste enquestion

Bonjour,

Citation:

---

Envoyé par retraite83

fichCatal = fich2 & ".xlsm"

---

fich2 vient d'où ?
En tout cas dans ton code il n'est ni défini, ni documenté.
Il se pourrait bien qu'il ne le soit pas non plus sur ce poste.

oui "fich2" est bien défini en constante public dans un module

Il est public mais il peut :
- ne pas être documenté sur ce pc
- ne plus être présent
- ne pas avoir les autorisations nécessaires sur ce poste
etc

fich2 est dans le module du fichier lui même, de plus le fichier "pathcatal" est bien ouvert au moment du plantage qui se produit sur la ligne "Application.run"

Citation:

---

au moment du plantage qui se produit sur la ligne "Application.run"

---

Cela ne veux pas dire que c'est là qu'est l'erreur car elle peux se situer dans la procédure que tu lances.
Il faudrait mettre un 'stop' avant le 'run' puis faire du pas à pas avec F8 sur le poste qui plante.