OVH Cloud OVH Cloud

Pb lors de duplication de document

1 réponse
Avatar
Sylvain
Bonjour,

J'ai un fichier modele .dot dans lequel se trouve un bouton.
Lorsque je clique sur ce bouton, j'effectue toutes sortes de traitement par
du code VBA. Tout fonctionne correctement.

Ce fichier me sert de modèle pour recreér d'autre fichier par programmation.
Le problème est que les autres fichiers sont bien recréés par contre le code
VBA associé ne l'est pas.
Du coup le bouton ne fait absolument rien vu que le code est absent.

Y' a t'il une astuce ou une manipulation à faire lorsque l'on créer des
documents à partir d'un modèle contenant du code VBA pour que celui ci soit
aussi copier/sauvergarder ?

Merci pour votre aide.
--
Sylvain Duvernay

1 réponse

Avatar
Anacoluthe
Bonjour !

'Sylvain' nous a écrit ...
J'ai un fichier modele .dot dans lequel se trouve un bouton.
Lorsque je clique sur ce bouton, j'effectue toutes sortes de traitement par
du code VBA. Tout fonctionne correctement.
Ce fichier me sert de modèle pour recreér d'autre fichier par programmation.
Le problème est que les autres fichiers sont bien recréés par contre le code
VBA associé ne l'est pas.
Du coup le bouton ne fait absolument rien vu que le code est absent.
Y' a t'il une astuce ou une manipulation à faire lorsque l'on créer des
documents à partir d'un modèle contenant du code VBA pour que celui ci soit
aussi copier/sauvergarder ?


Copie d'une précédente réponse :

Héritage des macros d'un modèle dans ses documents :
- Placez la procédure Bidule dans un *Module* de Toto.dot
- Placez dans un autre module de Toto.dot une macro automatique
qui va copier ce module nommé par exemple MonModule dans
chaque nouveau document :

Public Sub AutoNew()
' Copie le module MonModule dans chaque nouveau document
Application.OrganizerCopy _
Source:¬tiveDocument.Attache­dTemplate.FullName, _
Destination:¬tiveDocument.Fu­llName, _
Name:="MonModule", _
Object:=wdOrganizerObjectProje­ctItems
End Sub


Ça vous convient comme solution ?


Anacoluthe
« Il est plus facile de copier que de penser. »
- Wallace STEVENS