Excel'de belirli bir sayfa hariç tüm sayfaları nasıl yazdırabilirim?

Excel'de çalışırken, birden fazla sayfayı yazdırmak yaygın bir işlemdir. Ancak, bir çalışma kitabındaki tüm sayfaları, belirli bir sayfa hariç yazdırmak isterseniz ne yaparsınız? Örneğin, 'Toplam' adlı sayfayı hariç tutarak tüm sayfaları yazdırmak isteyebilirsiniz. Bu kılavuzda, yazdırma işleminizden bir sayfayı hızlıca hariç tutmak için iki yöntemden bahsedeceğiz.

VBA ile bir sayfa hariç tümünü yazdırma

Kutools for Excel ile ihtiyacınız olan belirli sayfaları yazdırın

VBA ile bir sayfa hariç tümünü yazdırma

İşte, belirli bir sayfa hariç tüm sayfaları yazdıran bir VBA kodu.

1. Yazdırmak istediğiniz sayfaların bulunduğu çalışma kitabını etkinleştirin ve Microsoft Visual Basic for Applications penceresini açmak için Alt + F11 tuşlarına basın.

2. Ekle > Modül'e tıklayın ve aşağıdaki kodu Modül betiğine yapıştırın.

VBA: Bir sayfa hariç yazdır

Sub printsheets() 'UpdatebyExtendoffice20161031 Dim xWs As Worksheet Application.ScreenUpdating = False For Each xWs In ThisWorkbook.Worksheets If xWs.Visible = True Then If xWs.Name <> "Total" Then With xWs.PageSetup .PrintArea = "A1:B15" ' USE YOUR PRINTAREA .Zoom = False .FitToPagesTall = 1 .FitToPagesWide = 1 End With xWs.PrintOut End If End If Next xWs Application.ScreenUpdating = False MsgBox "Sheet “Total” has not been printed", vbInformation, "Kutools for Excel" End Sub

Not: Kodda, If xWs.Name <> "Total" Then ve MsgBox "Sheet Total have not been printed" ifadelerindeki Toplam, yazdırmak istemediğiniz sayfa adıdır ve .PrintArea = "A1:B15" ifadesindeki A1:B15, her sayfada yazdırmak istediğiniz alandır. İhtiyaçlarınıza göre bunları değiştirebilirsiniz.

3. Kodu çalıştırmak için F5 tuşuna basın, ardından size belirli bir sayfanın yazdırılmadığını hatırlatan bir iletişim kutusu açılacaktır. Ekran görüntüsüne bakın:

4. İletişim kutusunu kapatmak için Tamam'a tıklayın.

Kutools for Excel ile ihtiyacınız olan belirli sayfaları yazdırın

Sadece çift veya tek sayfaları ya da bir sayfanın belirli sayfalarını yazdırmak istiyorsanız, Kutools for Excel'in Belirtilen Sayfaları Yazdır özelliği hızlı bir şekilde size yardımcı olabilir.

1. Belirli sayfaları yazdırmak istediğiniz sayfayı etkinleştirin ve Kutools Plus > Yazdırma > Belirtilen Sayfaları Yazdır'a tıklayın. Ekran görüntüsüne bakın:

2. Ardından Belirtilen Sayfaları Yazdır diyalogunda, yazdırma ihtiyacınıza göre seçenekleri işaretleyin. Ekran görüntüsüne bakın:

3. Sayfaları yazdırmak için Yazdır'a tıklayın.