Dianne se demande s’il existe un moyen de créer un modèle qui exclura tout nouveau style de l’introduction. Les clients collent du matériel avec une mise en forme et des styles dans ses documents et cela peut causer des problèmes.

Elle souhaite créer un modèle générique qui créera un document qui verrouille les styles non modèles.

Ce problème a tourmenté les utilisateurs de Word pendant des années (voire des décennies). Vous pouvez passer un peu de temps à obtenir votre modèle et votre feuille de style comme vous le souhaitez, puis l’envoyer à quelqu’un d’autre pour le renvoyer avec la liste de styles (et la mise en forme du document) dans l’équivalent électronique des lambeaux.

Il existe plusieurs approches pour tenter de remédier à la situation. Tout d’abord, vous pouvez essayer l’approche « s’il vous plaît ne faites pas cela » où vous demandez simplement aux autres de ne rien coller dans votre document. Ou, s’ils doivent coller quelque chose, demandez-leur d’utiliser l’une des variantes Collage spécial qui permettent de coller sans mise en forme.

Si vous souhaitez une approche plus énergique, procédez comme suit:

  1. Configurez votre modèle (y compris les styles) comme vous le souhaitez.

  2. Avec le modèle chargé dans Word, affichez l’onglet Accueil du ruban.

  3. Cliquez sur la petite icône en bas à droite du groupe Styles. Word affiche le volet Styles sur le côté droit de votre écran.

  4. Au bas du volet Styles, cliquez sur l’icône Gérer les styles. (Si vous ne pouvez pas déterminer quelle icône est laquelle, placez le pointeur de la souris sur chaque icône, à son tour, jusqu’à ce que l’info-bulle «Gérer les styles» s’affiche.) Word affiche la boîte de dialogue Gérer les styles.

  5. Assurez-vous que l’onglet Restreindre est sélectionné. (Voir la figure 1.)

  6. À partir des styles répertoriés dans la boîte de dialogue, créez un jeu de sélection des styles que vous souhaitez que l’utilisateur utilise. (Créez le jeu de sélection en cliquant sur un nom de style, puis en maintenant la touche Ctrl enfoncée tout en cliquant sur d’autres noms de style.)

  7. 7 Cochez la case Limiter le formatage aux styles autorisés.

  8. Cliquez sur OK.

  9. Enregistrez votre modèle.

Théoriquement, tout document basé sur le modèle limitera les styles que l’utilisateur peut utiliser dans leur mise en forme. Ce qui n’est pas clair, c’est si cela s’étend également à la limitation des styles pouvant être collés dans le document. Si vous préférez une version macro-appliquée de cette approche, vous pouvez utiliser les macros détaillées sur le blog suivant:

http://blogs.msdn.com/b/ericwhite/archive/2010/01/27/programmatically-limiting-styles-in-word.aspx

Bien sûr, vous pouvez créer un ensemble de macros qui empêcheraient les gens de coller du texte formaté dans un document. (Placez les macros dans le modèle sur lequel le document est basé et elles sont transmises automatiquement au document. Mise en garde normale: si l’utilisateur n’active pas les macros, alors cette approche n’a presque aucune valeur.)

Par exemple, une approche pour empêcher l’ajout de nouveaux styles consiste à déterminer le nombre de styles avant et après le collage. Si le nombre a augmenté, votre macro peut annuler le collage et donner à l’utilisateur la possibilité de coller dans le Presse-papiers sous forme de texte brut ou d’annuler. Cette méthode empêchera également l’introduction de styles à partir de tableaux et de zones de texte.

Il est important de réaliser qu’il n’y a pas d’événement de collage « général » qui puisse être piégé dans VBA. Au lieu de cela, il est nécessaire de personnaliser plusieurs des commandes intégrées de Word. Les éléments suivants remplacent quatre de ces commandes.

Sub EditPaste()

Dim k As Long

Options.PasteFormatBetweenDocuments = wdMatchDestinationFormatting     Options.PasteFormatBetweenStyledDocuments = wdUseDestinationStyles     k = ActiveDocument.Styles.Count     Selection.Range.Paste     If k <> ActiveDocument.Styles.Count Then         ActiveDocument.Undo         MsgBox "Paste unsuccessful. You tried to introduce new styles."

End If End Sub
Sub EditPasteSpecial()

Dim k As Long     Dim lk As Boolean

Options.PasteFormatBetweenDocuments = wdMatchDestinationFormatting     Options.PasteFormatBetweenStyledDocuments = wdUseDestinationStyles     k = ActiveDocument.Styles.Count     With Dialogs(wdDialogEditPasteSpecial)

.Show         lk = .link     End With     If lk Then         ActiveDocument.Undo         MsgBox "You are not allowed to paste links"

Exit Sub     End If     If k <> ActiveDocument.Styles.Count Then         ActiveDocument.Undo         If MsgBox("You have tried to introduce new styles." & vbCrLf & _           "Do you want to paste as plain text?", vbYesNo) = vbYes Then _           Selection.Range.PasteSpecial datatype:=wdPasteText     End If End Sub
Sub PasteDestinationFormatting()

Dim k As Long

k = ActiveDocument.Styles.Count     Selection.Range.Paste     If k <> ActiveDocument.Styles.Count Then         ActiveDocument.Undo         MsgBox "Paste unsuccessful. You tried to introduce new styles."

End If End Sub
Sub PasteSourceFormatting()

MsgBox "You are not allowed to paste with source formatting"

End Sub

Une autre approche non macro consiste à modifier la protection du document.

Avec le modèle chargé dans Word, procédez comme suit:

  1. Affichez le link: / wordribbon-Displaying_the_Developer_Tab [Developer tab] du ruban.

  2. Cliquez sur l’outil Restreindre la modification dans le groupe Protéger. Word affiche le volet Restreindre la modification sur le côté droit de votre document.

  3. Dans la zone Restrictions de mise en forme, cochez la case Limiter la mise en forme à une sélection de styles.

  4. Cliquez sur le lien Paramètres, juste sous la case à cocher. Word affiche la boîte de dialogue Restrictions de mise en forme. (Voir la figure 2.)

  5. Assurez-vous que la liste des styles reflète ceux que vous souhaitez que l’utilisateur puisse utiliser.

  6. Ajustez les cases à cocher au bas de la boîte de dialogue, comme vous le souhaitez.

  7. Cliquez sur OK. Word ferme la boîte de dialogue Restrictions de mise en forme.

  8. Si les restrictions que vous avez mises en place ont soulevé des conflits potentiels avec les styles utilisés dans le document, Word vous demande ce que vous voulez faire.

(Répondez comme vous le souhaitez.)

  1. Cliquez sur Oui, commencer à appliquer la protection. Word affiche la boîte de dialogue Démarrer l’application de la protection.

  2. Entrez un mot de passe pour la protection, si vous le souhaitez. (Vous devrez le saisir deux fois.)

  3. Cliquez sur OK.

  4. Fermez le volet Office Restreindre la mise en forme et la modification.

  5. Enregistrez votre modèle.

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites WordTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / wordribbon-WordTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

WordTips est votre source pour une formation Microsoft Word rentable.

(Microsoft Word est le logiciel de traitement de texte le plus populaire au monde.) Cette astuce (12698) s’applique à Microsoft Word 2007, 2010, 2013, 2016, 2019 et Word dans Office 365.