MS Wordの特定のページのみを印刷するようにデフォルトを設定

デフォルトで最初のxページだけを印刷するようにMS Word文書を設定する方法を教えてください。私は大きな文書を持っていますが、それを印刷する人々が最初の11ページの代わりに誤って全部を印刷することを望まない（私はそれらに印刷してもらいたい）。

これを行う唯一の方法は マクロを作成する 。

お好みのコードをマクロに追加してXを変更してください。希望の範囲にY（あなたの場合は1＆amp; 11）。

印刷ダイアログを表示して任意の範囲を選択できるようにするには、このコードを使用します。ただし、デフォルトはX-Yページに設定します。

Sub FilePrint()
  With ActiveDocument
       ' unprotect
       If .ProtectionType <> wdNoProtection Then
          .Unprotect Password:="snip"
       End If
       .Bookmarks("RunSpellCheckButton").Range.Font.Hidden = True
        With Dialogs(wdDialogFilePrint)
            .Range = wdPrintFromTo
            .From = X
            .To = Y
            .Show
        End With
      .Bookmarks("RunSpellCheckButton").Range.Font.Hidden = False
       ' reprotect
      .Protect Type:=wdAllowOnlyFormFields, NoReset:=True, Password:="snip"
  End With
End Sub

最初に印刷ダイアログを表示せずに、マクロの実行時に自動的にX-Yページを印刷する場合は、このコードを使用します。

Sub FilePrint()
  With ActiveDocument
       ' unprotect
       If .ProtectionType <> wdNoProtection Then
          .Unprotect Password:="snip"
       End If
       .Bookmarks("RunSpellCheckButton").Range.Font.Hidden = True
      .PrintOut Range:=wdPrintFromTo, From:="X", To:="Y"
      .Bookmarks("RunSpellCheckButton").Range.Font.Hidden = False
       ' reprotect
      .Protect Type:=wdAllowOnlyFormFields, NoReset:=True, Password:="snip"
  End With
End Sub

クレジット： Jay Freedman（マイクロソフトMVP） 。