Dans un environnement multi-utilisateur, il est souvent souhaitable de configurer Word afin qu’il puisse être facilement rétabli dans un état par défaut parfait. Par exemple, dans les laboratoires informatiques ou les centres de formation, vous souhaiterez peut-être que Word rétablit ses valeurs par défaut avant que le prochain groupe de personnes ne vienne apporter ses propres modifications de configuration.

Malheureusement, vous ne pouvez lancer aucun interrupteur pour empêcher les changements ou pour tout remettre à la normale. (Vous ne voudriez probablement pas empêcher les modifications de toute façon, en particulier si vous apprenez aux gens à personnaliser Word.) L’approche la plus proche consiste à utiliser le commutateur de ligne de commande / a pour démarrer Word. Selon le système d’aide en ligne, ce commutateur oblige Word à «empêcher les compléments et les modèles globaux (y compris le modèle Normal) d’être chargés automatiquement». Il «empêche également la lecture ou la modification des fichiers de paramètres». Si vous souhaitez utiliser ce commutateur, suivez simplement ces étapes:

  1. À l’aide du navigateur de bureau (Windows, pas Word), affichez le dossier contenant le raccourci utilisé pour démarrer Word.

  2. Cliquez avec le bouton droit sur l’icône de raccourci. Cela affiche un menu contextuel pour le raccourci.

  3. Sélectionnez l’option Propriétés dans le menu contextuel. Cela affiche la boîte de dialogue Propriétés du raccourci.

  4. Cliquez sur l’onglet Raccourci. (Voir la figure 1.)

  5. À la fin du champ Cible, ajoutez ce qui suit: / a (S’il y a des guillemets entourant le texte dans le champ Cible, veillez à placer le / a en dehors des guillemets. Assurez-vous également qu’il y a un espace avant le barre oblique.)

  6. Cliquez sur OK.

Notez que cette approche signifie que vous ne pouvez jamais modifier Word et que les modifications « collent ». Si vous devez faire démarrer la configuration à partir d’une condition autre que celle par défaut, la meilleure approche consiste à utiliser une macro AutoExec pour réinitialiser toutes les options définissables de Word à leur valeur par défaut. La macro exacte à utiliser serait différente, en fonction de la version de Word que vous utilisez. L’approche à utiliser pour créer la macro, cependant, peut être très cohérente. Tout ce que vous avez à faire est de suivre ces étapes générales:

  1. Faites une liste (sur papier) de toutes les options que vous souhaitez réinitialiser.

Répertoriez simplement les boîtes de dialogue et les onglets sur lesquels ces options apparaissent.

  1. Démarrez l’enregistreur de macros.

  2. Accédez à chaque boîte de dialogue et onglet que vous avez répertorié à l’étape 1.

  3. Modifiez un élément dans chaque boîte de dialogue ou onglet. (Vous pouvez simplement cocher et décocher une case, si vous le souhaitez.)

  4. Éteignez l’enregistreur de macros.

  5. Modifiez la macro pour apporter les modifications nécessaires. (Par exemple, dans l’exemple de macro plus loin dans cette astuce, le réglage fin impliquait de déplacer les options et de les placer dans l’ordre alphabétique.)

  6. Nommez la macro AutoExec.

Notez que la longueur de la macro peut être assez longue, selon le nombre de boîtes de dialogue et d’onglets que vous visitez. La macro suivante, par exemple, est un exemple d’un tel « set to default »

macro qui a été créée pour être utilisée dans Word 2000. (Cette macro est incluse à des fins d’illustration uniquement; votre macro sera différente, en fonction de l’ordre dans lequel vous visitez les boîtes de dialogue et de ce que vous voulez inclure dans la macro.)

Sub MyOptions()



RecentFiles.Maximum = 9     Languages(wdEnglishUS).SpellingDictionaryType = wdSpelling     Languages(wdEnglishUS).DefaultWritingStyle = "Formal"



With ActiveDocument         .ActiveWritingStyle(wdEnglishUS) = "Formal"

.ClickAndTypeParagraphStyle = "Normal"

.Compatibility(wdAlignTablesRowByRow) = False         .Compatibility(wdAutospaceLikeWW7) = False         .Compatibility(wdConvMailMergeEsc) = False         .Compatibility(wdDontAdjustLineHeightInTable) = True         .Compatibility(wdDontBalanceSingleByteDoubleByteWidth) = True         .Compatibility(wdDontULTrailSpace) = True         .Compatibility(wdDontUseHTMLParagraphAutoSpacing) = False         .Compatibility(wdExactOnTop) = False         .Compatibility(wdExpandShiftReturn) = True         .Compatibility(wdFootnoteLayoutLikeWW8) = False         .Compatibility(wdForgetLastTabAlignment) = False         .Compatibility(wdLayoutRawTableWidth) = False         .Compatibility(wdLayoutTableRowsApart) = False         .Compatibility(wdLeaveBackslashAlone) = True         .Compatibility(wdLineWrapLikeWord6) = False         .Compatibility(wdMWSmallCaps) = False         .Compatibility(wdNoColumnBalance) = False         .Compatibility(wdNoExtraLineSpacing) = False         .Compatibility(wdNoLeading) = False         .Compatibility(wdNoSpaceForUL) = True         .Compatibility(wdNoSpaceRaiseLower) = False         .Compatibility(wdNoTabHangIndent) = False         .Compatibility(wdOrigWordTableRules) = False         .Compatibility(wdPrintBodyTextBeforeHeader) = False         .Compatibility(wdPrintColBlack) = False         .Compatibility(wdShapeLayoutLikeWW8) = False         .Compatibility(wdShowBreaksInFrames) = False         .Compatibility(wdSpacingInWholePoints) = False         .Compatibility(wdSubFontBySize) = False         .Compatibility(wdSuppressBottomSpacing) = True         .Compatibility(wdSuppressSpBfAfterPgBrk) = True         .Compatibility(wdSuppressTopSpacing) = True         .Compatibility(wdSuppressTopSpacingMac5) = False         .Compatibility(wdSwapBordersFacingPages) = False         .Compatibility(wdTransparentMetafiles) = False         .Compatibility(wdTruncateFontHeight) = False         .Compatibility(wdUsePrinterMetrics) = False         .Compatibility(wdWPJustification) = False         .Compatibility(wdWPSpaceWidth) = False         .Compatibility(wdWrapTrailSpaces) = False         .Compatibility(wdWW6BorderRules) = False         .EmbedTrueTypeFonts = False         .OptimizeForWord97 = False         .Password = ""

.PrintFormsData = False         .PrintPostScriptOverText = False         .ReadOnlyRecommended = False         .SaveFormsData = False         .SaveSubsetFonts = False         .ShowGrammaticalErrors = True         .ShowSpellingErrors = True         .WritePassword = ""

End With

With ActiveWindow         .DisplayHorizontalScrollBar = True         .DisplayLeftScrollBar = False         .DisplayRightRuler = False         .DisplayScreenTips = True         .DisplayVerticalScrollBar = True         .StyleAreaWidth = InchesToPoints(0)

With .View             .Draft = False             .FieldShading = wdFieldShadingAlways             .ShowAll = False             .ShowAnimation = True             .ShowBookmarks = True             .ShowDrawings = True             .ShowFieldCodes = False             .ShowHiddenText = False             .ShowHighlight = True             .ShowHyphens = False             .ShowObjectAnchors = False             .ShowParagraphs = False             .ShowPicturePlaceHolders = False             .ShowSpaces = False             .ShowTabs = False             .ShowTextBoundaries = False             .WrapToWindow = False         End With     End With

With Application     .DisplayRecentFiles = True     .DisplayStatusBar = True     .DefaultSaveFormat = ""

.UserName = "User Name"

.UserInitials = "User Initials"

.UserAddress = "User Name" & Chr(13) & Chr(10) & _         "Street Address" & Chr(13) & Chr(10) & "City, State zip"

End With

With CustomDictionaries         .ClearAll         .Add("C:\WINDOWS\Application Data\Microsoft\Proof\CUSTOM.DIC"). _             LanguageSpecific = False         .ActiveCustomDictionary = CustomDictionaries.Item( _             "C:\WINDOWS\Application Data\Microsoft\Proof\CUSTOM.DIC")

End With

With Options         .AllowAccentedUppercase = False         .AllowClickAndTypeMouse = False         .AllowCombinedAuxiliaryForms = True         .AllowCompoundNounProcessing = True         .AllowDragAndDrop = True         .AllowFastSave = False         .AllowPixelUnits = False         .AnimateScreenMovements = False         .ApplyFarEastFontsToAscii = False         .AutoKeyboardSwitching = False         .AutoWordSelection = False         .BackgroundSave = True         .BlueScreen = False         .CheckGrammarAsYouType = False         .CheckGrammarWithSpelling = False         .CheckSpellingAsYouType = False         .ConfirmConversions = False         .CreateBackup = False         .DefaultFilePath(Path:=wdDocumentsPath) = "C:\My Documents"

.DefaultTray = "Use printer settings"

.DeletedTextColor = wdBlue         .DeletedTextMark = wdDeletedTextMarkStrikeThrough         .EnableMisusedWordsDictionary = True         .EnableSound = False         .IgnoreInternetAndFileAddresses = True         .IgnoreMixedDigits = False         .IgnoreUppercase = False         .InsertedTextColor = wdRed         .InsertedTextMark = wdInsertedTextMarkUnderline         .INSKeyForPaste = False         .InterpretHighAnsi = wdHighAnsiIsHighAnsi         .MapPaperSize = True         .MeasurementUnit = wdInches         .OptimizeForWord97byDefault = False         .Overtype = False         .Pagination = True         .PictureEditor = "Microsoft Word"

.PrintBackground = False         .PrintComments = False         .PrintDraft = False         .PrintDrawingObjects = True         .PrintFieldCodes = False         .PrintHiddenText = False         .PrintProperties = False         .PrintReverse = False         .ReplaceSelection = True         .RevisedLinesColor = wdViolet         .RevisedLinesMark = wdRevisedLinesMarkOutsideBorder         .RevisedPropertiesColor = wdGreen         .RevisedPropertiesMark = wdRevisedPropertiesMarkNone         .RTFInClipboard = True         .SaveInterval = 10         .SaveNormalPrompt = True         .SavePropertiesPrompt = True         .SendMailAttach = True         .ShortMenuNames = False         .ShowReadabilityStatistics = False         .SmartCutPaste = True         .SuggestFromMainDictionaryOnly = False         .SuggestSpellingCorrections = True         .TabIndentKey = False         .UpdateFieldsAtPrint = True         .UpdateLinksAtOpen = True         .UpdateLinksAtPrint = True         .VirusProtection = False         .WPDocNavKeys = False         .WPHelp = False     End With

End Sub

_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 (642) s’applique à Microsoft Word 97, 2000, 2002 et 2003.