Discussion :

[Francine222]

Bonjour,

Je dois publier des documents Word qui contiennent des macros sur un site SharePoint. Ces documents seront utilisés par toutes sortes d'usagers et j'aimerais mettre un code vba qui permettera de conserver le format "docm" du document à l'enregistrement. Si ce n'est pas possible, peux-t'on afficher un message lors de l'enregistrement pour mettre en garde les usagers de ne pas changer le format.

Merci.

Francine

[clementmarcotte]

Bonjour,

Bonjour,

Je dois publier des documents Word qui contiennent des macros sur un site SharePoint. Ces documents seront utilisés par toutes sortes d'usagers et j'aimerais mettre un code vba qui permettera de conserver le format "docm" du document à l'enregistrement. Si ce n'est pas possible, peux-t'on afficher un message lors de l'enregistrement pour mettre en garde les usagers de ne pas changer le format.

Merci.

Francine

À quelque part, avant de fermer le document:

Code :

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

1
2
3
dim nomfichier as string
Nomfichier = "machin.docm"
 ActiveDocument.SaveAs2 FileName:= Nomfichier ,  FileFormat:=wdFormatXMLDocumentMacroEnabled

Dans l'aide de VBA, les constantes "FileFormat" et leurs valeurs numériques sont à:

WdSaveFormat, énumération

Les différentes options de saveas2 sont à:

Document.SaveAs2, méthode

[Francine222]

Je ne sais pas trop où mettre ce code, il faudrait qu'il apparaisse lorsque l'usager effectue "enregistrer sous". Et, est-ce que ce code fonctionne si le nom du document change?

[clementmarcotte]

Bonjour,

Je ne sais pas trop où mettre ce code, il faudrait qu'il apparaisse lorsque l'usager effectue "enregistrer sous". Et, est-ce que ce code fonctionne si le nom du document change?

En fait, tu pourrais la mettre dans la procédure de l'événement Document_close.

1) Tu cliques sur l'icône ThisDocument.
2) Tu affiches Document dans la liste déroulante de gauche
3) Tu choisis Close dans la liste déroulante de droite

L'enregistrement se fait automatiquement

Quant à afficher un message avant un enregistrement manuel par l'utilisateur; cela demande un peu plus de recherches, plus tard. À vrai dire, je ne suis pas trop sur de la suite...

[Francine222]

J'ai fait le test et j'obtient un Run-time error '438' Object doesn't support this property or method.

Mais le problème réside toujours, je dois les empêcher d'enregistrer le document en .docx, les usagers font un "save as" et change .docm en .docx malgré le message de MS Word qui dit que le document ne peut être enregistrer en format "macro-free document", mais ils le font tout de même.

[clementmarcotte]

Bonjour,

J'ai fait le test et j'obtient un Run-time error '438' Object doesn't support this property or method.

Mais le problème réside toujours, je dois les empêcher d'enregistrer le document en .docx, les usagers font un "save as" et change .docm en .docx malgré le message de MS Word qui dit que le document ne peut être enregistrer en format "macro-free document", mais ils le font tout de même.

À te lire, j'ai l'impression que c'est (ce sont) un (des) documents qui doit (doivent) "circuler" parmi un groupe de personnes, et chaque personne a besoin des macros pour "faire sa part d'ouvrage"; Est-ce bien cela ?

Même si la nuit porte conseil, j'avoue ne pas trop savoir comment on pourrait empêcher quelqu'un de changer l'extension en chemin. Mon Word 2010, n'a pas l'air de supporter d'événement pour intercepter l'enregistrement. (À moins, peut-être, de faire un module de classe ad-hoc, mais là, c'est loin d'être ma spécialité.)

Ce qui me semble le plus faisable, c'est de créer un complément (macro complémentaire dans "l'ancien temps"), ou un modèle spécifique avec les macros, qui contiendrait les macros et qui serait installé sur les machines des "clients". En quelque sorte, le document pourrait se promener avec ou sans les macros; tant et aussi longtemps que les utilisateurs auraient quand même les macros à portée de la main.

[Francine222]

En gros oui, les documents sont déposés dans un site SharePoint et les gens les récupèrent pour ensuite les enregistrer soit sur un autre site sharePoint, soit sur un réseau local. Les macros doivent malheureusement suivre le document. Installer un complément sur les ordinateurs de tous les usagers n'est pas possible, environ 4000 à travers la planète. Je vais essayer un code qui force l'usager à faire une sauvegarde dès l'ouverture du document incluant des directives précises dans la boîte de dialogue.

[kiki29]

Salut, si cela peut aider, voir via cette recherche.

[Sepia]

Salut Francine222,

Si tu pars sur une solution de "remplacement de commande standard par une macro" comme "Enregistrer Sous", n'oublie pas les barres d'outils, les les raccourcis clavier et les commandes annexes (même si ici la commande "Enregistrer" semble ne pas être impacté).

@+