Discussion :

[frouppy]

Bonjour !

J'ai un module MODTest dans mon modèle Normal.dotm.

Dedans, j'ai cette procédure :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub Test()
   Msgbox "Hello"
End Sub

Je suis dans un autre document DOCQuelconque.docm. Je crée ce code événementiel :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Document_Close()
   Test
End Sub

Ca marche très bien, il me dit "Hello" à la fermeture du document.

MAIS

A la place d'un document, je crée un modèle ModeleQuelconque.doTm, et que j'y crée les 2 procédures événementielles suivantes :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Document_New()
   Test
End Sub
 
Private Sub Document_Close()
   Test
End Sub

J'enregistre mon modèle, je quitte word, je relance word, je fais fichier/Nouveau, et je choisis mon modèle ModeleQuelconque.doTm, alors il exécute bien Private Sub Document_New

MAIS quand je fais Fichier/Fermer, j'ai un message d'erreur "Erreur de compilation Sub ou Function non définie", alors que Normal.dotm est toujours bien ouvert.

J'ai essayé de remplacer l'appel à test

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Test

par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Documents("Normal.dotm").Test

Mais j'ai un autre message : "Erreur d'exécution 4169. Nom de fichier incorrect"

POURQUOI donc le fait qu'il s'agisse d'un modèle vient changer les choses ? ... Merci d'avance de vos avis...

[Jean-Philippe André]

Salut,

pour exécuter une macro, on passe généralement par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.Run "Nom"

Dans l'aide en ligne MS, tu trouves même la syntaxe qui devrait te plaire
https://msdn.microsoft.com/fr-fr/vba...un-method-word

[frouppy]

EXCELLENT !!!

Ces deux lignes de code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Application.Run "Normal.NewMacros.Test"
Application.Run "'Normal.dotm'!NewMacros.test"

Fonctionnent aussi bien l'une que l'autre !

Merci mille fois !