Lancement Macro en fonction du nom de classeur

[Eric D]

Bonjour,

Je souhaiterais avoir la possibilité d'exécuter une macro seulement si le classeur actif porte un nom bien précis (ex: Toto.xls).
Si le classeur actif porte un nom différent, il faudrait donc interdire le lancement.

Est-ce réalisable ?

Merci pour vos réponses.
Eric

 

[maraboul]

Essaies ceci, c'est pas forcément le plus élégant mais ça devrait marcher...


Sub Macro()
If ActiveWorkbook.Name = "toto.xls" Then

'mets ta macro ici

Else
GoTo 1
End If
1
End Sub


Bon courage,

Maraboul

 

[Eric D]

Merci Maraboul, c'est exactement ce qu'il me faut.

Tant pis pour le concours d'élégance, c'est l'efficacité qui compte !

Bonne soirée,
Eric

 

[@+Thierry]

Bonjour Maraboul, Eric, le Forum

Tout va très bien dans cette macro Maraboul, la syntax est correcte, la seule chose qui me chiffonne c'est le GoTo qui, de plus ne sert pas du tout dans ce cas de figure.

Ceci suffit amplement :
Sub Macro()
If ActiveWorkbook.Name = "toto.xls" Then
'mets ta macro ici
End If
End Sub

En fait avec un "If", on est pas obligé d'avoir une alternative "Else", ce que tu sembles vouloir faire.

On peut même faire l'opposé, ce qui correspondrait encore mieux en retranscription litéral en VBA de la demande d'Eric "Si le classeur actif porte un nom différent, il faudrait donc interdire le lancement" :

Sub Macro()
If ActiveWorkbook.Name <> "toto.xls" Then Exit Sub

'mets ta macro ici
End Sub

Bonne Fin de Journée
@+Thierry

 

[Eric D]

Merci Thierry pour ces autres précisions.
Voilà un dossier complet !

Bonne journée,
Eric

 

[olive]

Bonjour!!

J'ai une question qui se rapproche un peu de ce point la:

En fait, je voudrais savoir comment lancer une macro qui se trouve dans un autre classeur.

En gros, j'ai un truc qui marche:
-----------------------------------------------
Run ("monclasseur.xls!mamacro")
-----------------------------------------------
Cela signifie que je lance mamacro qui est contenue dans monclasseur.xls a partir d'un autre classeur

mais comment peut-on faire pour faire la meme chose en sachant que le nom de classeur est variable?

run(fichier!mamacro) ne fonctionne pas...

merci pour votre aide!!

 

[olive]

Bonjour!!

J'ai une question qui se rapproche un peu de ce point la:

En fait, je voudrais savoir comment lancer une macro qui se trouve dans un autre classeur.

En gros, j'ai un truc qui marche:
-----------------------------------------------
Run ("monclasseur.xls!mamacro")
-----------------------------------------------
Cela signifie que je lance mamacro qui est contenue dans monclasseur.xls a partir d'un autre classeur

mais comment peut-on faire pour faire la meme chose en sachant que le nom de classeur est variable?

run(fichier!mamacro) ne fonctionne pas...

merci pour votre aide!!