MS Word'de yalnızca belirli sayfaları yazdırmak için varsayılanı ayarla

Bir MS Word belgesini yalnızca ilk x sayfayı varsayılan olarak yazdırmak için nasıl ayarlayabilirim? Çok büyük bir belgem var, ancak ilk 11 sayfa yerine (hepsini yazdırmasını istediğim) her şeyi yanlışlıkla yazdırmasını isteyen kişilerin yazdırmasını istemiyorum.

Bunu yapmanın tek yolunun olduğuna inanıyorum makro oluşturma .

Tercih ettiğiniz kodu makronuza ekleyin ve X & amp; Y istediğiniz aralığa (sizin durumunuzda 1 ve 11).

Yazdırma iletişim kutusunu göstermek ve herhangi bir aralığın seçimine izin vermek, ancak yalnızca varsayılan X-Y sayfalarına ayarlamak istiyorsanız bu kodu kullanın:

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

Makroyu çalıştırırken, önce yazdırma iletişim kutusunu göstermeden X-Y sayfalarını otomatik olarak yazdırmasını istiyorsanız, bu kodu kullanın:

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

Kredi: Jay Freedman (Microsoft MVP) .