Application.MacroContainer (Word)

Renvoie un objet template ou document qui représente le modèle ou le document dans lequel est stocké le module qui contient la procédure en cours d’exécution.

Set cntnr = MacroContainer 
MsgBox cntnr.Name