Problème macro

[eduraiss]

Bonjour le forum

Voila j'ai le code suivant

Sub Macro3()

Application.Run "'M2 Z2 SE 34.XLS'!MACROM2"
Application.Run "'M2 Z2 SE 34.XLS'!MACROZ2"
End Sub

ce code me sert a déclencher 2 macro, mais je voudrais remplacer
'M2 Z2 SE 34.XLS' par le classeur ou je me trouve(car ce code est copier dans plusieurs classeur ayant un nom différent)
Merci a vous

 

[pierrejean]

Re : Problème macro

bonjour eduraiss

A tester:

Application.Run "'" & Replace(ThisWorkbook.Name, ".xls", "") & "'!MACROM2"

 

[eduraiss]

Re : Problème macro

Bonjour Pierre jean et merci

Ok mais cela ne fonctionne pas

Je joins un fichier je voudrais mettre des couleurs dans des cellules suivant une liste de nom


Merci de votre aide

 

[pierrejean]

Re : Problème macro

Re

Un peu perdu moi !!!

Quel rapport entre ta question initiale et le fichier ?

Que veux-tu dire par: cela ne fonctionne pas ?

Dans ce fichier quelle couleur veux-tu mettre et ou ?

 

[eduraiss]

Re : Problème macro

Bonjour et excuse moi

Cela fonctionne mais je n'arrive pas a déclencher 2 macro les une aprés les autres et le fichier est trop volumineux pour être mis sur le forum

Pour cela il me faudrait une autre macro qui met une couleur dans le tableau suivant la liste des personnes qui se trouve en colonne R de la feuille Groupes Semaines
Exemple VERSAVEAU S est dans la liste je la colorie en jaune

Merci a toi et désolé

 

[pierrejean]

Re : Problème macro

Re

Voila ta macro pour la mise en couleur

Pour declencher 2 macros l'une apres l'autre je ne vois pas quel est le problème

 

[eduraiss]

Re : Problème macro

Re

Merci beaucoup Pierrejean c'est exactement ce qui me fallait
Je n'ai pas de problème maintenant pour déclencher mes deux macro
Cordialement.