Bonjour à tous,
Question simple, je connais le nom d'une SUB contenue dans un modèle au travers d'un champ nommé Excel, comment faire en VBA pour l'appeler ?

Voilà, l'exposé de ma question de façon plus exhaustive :

Exemple : champ nommé en A1 NomProcédure, et en A1 j'écris "Ma_Sub"

Dans un module de ce modèle j'écris :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Option Explicit
Private Sub Ma_Sub()
MsgBox "Procédure exécutée en fin de mise en forme du modèle"
End Sub
Dans le déroulé d'une macro, je veux faire appel à cette SUB, comme suit par exemple :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
Dim MaProc as variant
MaProc = range("NomProcédure).Value
Call MaProc      ' ce Call ne fonctionne qu'avec un nom explicite, d'où erreur VBA 438
End Sub
Par avance merci
Bertrand