マルチユーザー環境では、Wordをセットアップして、元のデフォルト状態に簡単に戻すことができるようにすることが望ましい場合がよくあります。たとえば、コンピュータラボやトレーニングセンターでは、次のグループの人々が参加して独自の構成変更を行う前に、Wordをデフォルト値に戻したい場合があります。

残念ながら、変更を防止したり、すべてを通常に戻したりするためにスローできるスイッチはありません。 (特にWordをカスタマイズする方法を人々に教えている場合は、とにかく変更を防ぎたくないでしょう。)最も近いアプローチは、Wordを起動するために/ aコマンドラインスイッチを使用することです。オンラインヘルプシステムによると、このスイッチにより、Wordは「アドインとグローバルテンプレート(通常のテンプレートを含む)が自動的に読み込まれないようにします」。また、「設定ファイルの読み取りや変更を防止します」。このスイッチを使用する場合は、次の手順に従ってください。

。デスクトップブラウザ(WordではなくWindows)を使用して、Wordの起動に使用するショートカットを含むフォルダを表示します。

。ショートカットアイコンを右クリックします。これにより、ショートカットのコンテキストメニューが表示されます。

。 [コンテキスト]メニューから[プロパティ]オプションを選択します。これにより、ショートカットの[プロパティ]ダイアログボックスが表示されます。

。 [ショートカット]タブをクリックします。 (図1を参照)

。 [ターゲット]フィールドの最後に、次を追加します。/a([ターゲット]フィールドのテキストを囲む引用符がある場合は、引用符の外側に/ aを配置してください。また、前にスペースがあることを確認してください。スラッシュ。)

。 [OK]をクリックします。

このアプローチは、Wordを変更したり、変更を「固定」したりすることはできないことを意味することに注意してください。デフォルト以外の条件から構成を開始する必要がある場合は、AutoExecマクロを使用して、Wordの設定可能なすべてのオプションをデフォルトにリセットするのが最善の方法です。使用する正確なマクロは、使用しているWordのバージョンによって異なります。ただし、マクロの作成に使用するアプローチは非常に一貫している可能性があります。あなたがする必要があるのはこれらの一般的なステップに従うことです:

。リセットしたいすべてのオプションのリストを(紙に)作成します。

これらのオプションが表示されるダイアログボックスとタブを一覧表示するだけです。

。マクロレコーダを起動します。

。手順1でリストした各ダイアログボックスとタブにアクセスします。

。各ダイアログボックスまたはタブで1つの項目を変更します。 (必要に応じて、チェックボックスをオンまたはオフにするだけです。)

。マクロレコーダの電源を切ります。

。マクロを編集して、必要な微調整の変更を加えます。 (たとえば、このヒントの後半のサンプルマクロでは、微調整にはオプションの移動とアルファベット順の配置が含まれていました。)

。マクロにAutoExecという名前を付けます。

アクセスするダイアログボックスとタブの数によっては、マクロの長さが非常に長くなる可能性があることに注意してください。たとえば、次のマクロは、このような「デフォルトに設定」の例です

Word 2000で使用するために作成されたマクロ。(このマクロは説明のみを目的として含まれています。ダイアログボックスにアクセスする順序とマクロに含める内容によって、マクロは異なります。)

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

注:

このページ(または_WordTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。

(Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。)このヒント(642)は、Microsoft Word 97、2000、2002、および2003に適用されます。