enchainements de modules avec une macro

[MacGyver77]

Bonjour,

J'aimerais savoir si quelqu'un connait une macro pour enchaîner des modules sous Excel (VBA).

En effet, j'ai actuellement douze modules (tous assez lourd) que je dois lancer un par un et j'aimerais mettre en place un bouton qui m’enchaîne les douze à la suite.

Vu la taille de chaque module, je ne peux pas mettre toutes les infos dans un seul (j'ai déjà été bloqué niveau taille)

Ai-je été assez clair car je débute sur les macros?

Merci d'avance.
-----

[matthieu2]

Bonjour,

Dans un autre module, créez une fonction (sub toto par exemple). Dans cette fonction ajouter le code suivant:

Sub toto()
Call NomDeLaFonctionaAppeller
End Sub

Si par exemple dans un de vos modules vous avez le nom de fonction "titi" alors:

Call titi

et ainsi de suite jusqu'à appeler tous les modules nécessaires.

Enfin, assigner la macro "toto" (dans notre exemple) à votre bouton.

Cordialement,

[MacGyver77]

Bonjour,

Merci pour votre réponse.

Le souci est que j'ai dans chaque module une vingtaine de sub et c'est pour cela que je me demandais si je pouvais appeler les modules directement au lieu des sub de chacun de mes modules?

je ne sais pas si c'est très clair...

Cordialement

[matthieu2]

Bonjour,

Je sais pas si c'est clair mais j'ai compris

Quand vous appelez le module, tous les sub qu'il contient ne s'executent pas?

Essayez en encapsulant vos sub d'un module dans une fonction (je ne l'ai jamais fait mais ça peut marcher):

Function toto()
    Sub toto1()
        'traitement 1
    End Sub
    Sub toto2()
        'traitement 2
    End Sub
    Sub toto3()
        'traitement 3
    End Sub
End Sub

Sinon je ne vois pas d'autre solution que d'écrire le code pour les appeler 1 par 1...

Sauf si quelqu'un à une autre idée?

Cordialement,

[A voir en vidéo sur Futura]

[MacGyver77]

Bonjour,

merci matthieu2, cela fonctionne a priori. Cela va me permettre de gagner un temps considérable.

Merci encore et bonne journée.