Excel 2013 Macro non liée a mon classeur

Résolu
Lodhoss2 Messages postés 28 Date d'inscription   Statut Membre Dernière intervention   -  
Lodhoss2 Messages postés 28 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous,

J'aimerais créer une macro qui exécute plusieurs macro (j'utilise le bouton enregistrer), mais le nom de mon fichier excel apparaît dans la partie VB et du coup si je renomme mon fichier elle fonctionne plus...

ex:
Application.Run "Calendrier6.xlsm!InserLignes"
Application.Run "Calendrier6.xlsm!CopieCases"

Quelqu'un a une idée de ce qu'il faut modifier pour que ce soit générique?

Merci d'avance!
A voir également:

3 réponses

rEVOLV3r Messages postés 223 Date d'inscription   Statut Membre Dernière intervention   28
 
Bonjour,

Une explication par exemple :

voici vos macro dans votre module 1 :

sub InserLignes()
end sub

sub CopieCases()
end sub

.
.
.

Pour lancer ces macros à la suite, par une autre macro, créez par exemple dans le module 2 la macro :

sub execution_totale()
call InserLignes
call CopieCases
end sub

vous pouvez également mettre le nom du module devant si vous avez le meme nom de macro dans plusieurs modules.

sub execution_totale()
call module1.InserLignes
call module1.CopieCases
end sub

En espérant vous avoir débloqué,
Bonne journée

rEVOLV3r
0
Lodhoss2 Messages postés 28 Date d'inscription   Statut Membre Dernière intervention   1
 
Merci beaucoup, ça marche nickel!

J'ai une autre petite question, avant de mettre les "Call" et utilisant l'enregistrement automatique, il m'avait mis cette ligne :
Application.CutCopyMode = False

A quoi sert elle?

Merci!
0
rEVOLV3r Messages postés 223 Date d'inscription   Statut Membre Dernière intervention   28
 
Ca désactive la sélection d'un copier ou couper (les tirets qui défilent) et donc vide le presse-papier.

trouvé ici :
https://forums.commentcamarche.net/forum/affich-20593951-excel-vba-application-cutcopymode-false

N'hésitez pas si vous avez d'autres questions.

Bonne journée
0
Lodhoss2 Messages postés 28 Date d'inscription   Statut Membre Dernière intervention   1
 
Merci beaucoup!
0