Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

macro qui ne s'execute pas

  • Initiateur de la discussion Initiateur de la discussion kiki31140
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

kiki31140

XLDnaute Junior
Bonjour à tous

voici mon problème.
Avec un fichier A, j'ouvre un fichier B lorsque ma cellule L41 n'est pas vide.
Dès que le fichier B est ouvert, je lui demande d'executer une macro "macrodufichierB".
ça ne marche pas . J'ai un message :
erreur 1004 . impossible d'excuter la macro 'toto'. Il est possible qu'elle ne soit pas dispo dans ce classeur ou que toutes les macros soient désactivées

J'ai refait le test en ayant ouvert le fichier B avant et activé les macros manuellement, et c'est pareil.

voici mon code

If Target.Address = "$L$41" Then
If Target.Text <> vbNullString Then
Workbooks.Open Filename:="\\mon_reseau_interne\fichierB.xls"
Application.Run ("\\mon_reseau_interne\fichierB.xls!macrodufichierB")'

End If
End If

merci par avance

KIKI
 
Re : macro qui ne s'execute pas

bonsoir ,

voir comme ceci !?

Code:
If Target.Address = "$L$41" Then
   If Target.Text <> vbNullString Then
       Workbooks.Open Filename:="\\mon_reseau_interne\fichierB.xls"
       Application.Run "fichierB.xls!'LeNomDeTaMacro'"
   End If
End If
 
Re : macro qui ne s'execute pas

Bonjour Roland

Merci pour ta réponse.
J'ai toujours le même type de message d'erreur.
J'ai sauvegardé mes 2 fichiers en local et je les ai même sauvegardé en .xlsm (au cas où)

la macro du fichier B ne s'execute pas du tout.
Et je ne pense pas que cela vienne de ma macro, car j'ai testé avec une macro simple : ActiveWorkbook.SAVE

De plus le debbogage me renvoie sur la ligne application.run !!!!

merci d'avance pour votre aide.

Christian
 
Dernière édition:
Re : macro qui ne s'execute pas

ça y est j'ai trouvé mon erreur et ça marche.

en fait, dans ma ligne Application.Run , j'avais laissé le chemin d'accès.
Application.Run "\\mon_reseau_interne\fichierB.xls!LeNomDeTaMacro"

encore merci Roland
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
7
Affichages
968
Réponses
3
Affichages
951
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…