Tıklayarak Sayfa Sonu görünümünde bir çalışma sayfası gösterdiğimizde Görüntüle > Sayfa Sonu Önizlemesi, yazdırılmayan alanın arka planı otomatik olarak koyu griye dönecektir. Aşağıdaki ekran görüntüsüne bakın:

not: Ayrıca, Sayfa Sonu Önizleme görünümüne tıklayarak da değiştirebilirsiniz. Sayfa Sonu Önizlemesi Durum Çubuğundaki düğmesi.

Ancak, bu yöntem yazdırılmayan alanı gizlemez ve yine de yazdırılmayan alandaki verileri görüntüleyebilirsiniz.

Seçilen aralık dışındaki her şeyi gizlemek için tek tıklama (kullanılmayan sütunu / satırları / hücreleri gizle)

Çoğu zaman, çalışma sayfasının yalnızca sayısal boş hücre / aralık bırakılan bir bölümünü kullanabiliriz. Kutools for Excel's Kaydırma Alanını Ayarla yardımcı program, seçilen aralık dışındaki her şeyi gizlemek için tek bir tıklamayla veya kullanılmayan tüm hücreleri / satırları / sütunları / aralıkları kolayca gizlemenize yardımcı olabilir.

Excel'de yazdırılmayan alanı tamamen gizlemek için VBA makrosunu deneyebilirsiniz. Ve aşağıdaki gibi yapabilirsiniz:

Adım 1: tuşuna basın. Ara Toplam + F11 Microsoft Visual Basic for Applications penceresini açmak için aynı anda tuşlarına basın.

Adım 2: Tıklayın Ekle > modülve ardından aşağıdaki VBA kodunu modül penceresine yapıştırın:

VBA: Mevcut Çalışma Sayfasında Yalnızca Baskı Alanını Göster

Public Sub HideAllButPrintArea()
Dim xPrintRng As Range
Dim xFirstRng As Range
Dim xLastRng As Range
Application.ScreenUpdating = False
With Application.ActiveSheet
.Cells.EntireColumn.Hidden = False
.Cells.EntireRow.Hidden = False
If .PageSetup.PrintArea <> "" Then
Set xPrintRng = .Range(.PageSetup.PrintArea)
Else
Set xPrintRng = .UsedRange
End If
Set xFirstRng = xPrintRng.Cells(1)
Set xLastRng = xPrintRng.Cells(xPrintRng.Count)
If xFirstRng.Row > 1 Then
.Range(.Cells(1, 1), xFirstRng(-0, 1)).EntireRow.Hidden = True
End If
If xFirstRng.Column > 1 Then
.Range(.Cells(1, 1), xFirstRng(1, 0)).EntireColumn.Hidden = True
End If
If xLastRng.Row < .Rows.Count Then
.Range(xLastRng(2, 1), .Cells(.Rows.Count, 1)).EntireRow.Hidden = True
End If
If xLastRng.Column < .Columns.Count Then
.Range(xLastRng(1, 2), .Cells(1, .Columns.Count)).EntireColumn.Hidden = True
End If
End With
Application.ScreenUpdating = True
End Sub

Adım 3: Basın F5 anahtarı veya tıklayın koşmak Bu VBA makrosunu çalıştırmak için düğmesine basın.

Ardından, yazdırılmayan alanın aynı anda gizlendiğini ve geçerli çalışma sayfasında yalnızca yazdırma alanının gösterildiğini göreceksiniz. Aşağıdaki ekran görüntüsüne bakın:

notlar:

1. Geçerli çalışma sayfasında yalnızca bir yazdırma alanı olduğunda, VBA makrosu iyi çalışır.
2. Bu yöntem geri almayı desteklemez. Yazdırılmayan alanı göstermek için, yazdırılmayan alanı manuel olarak göstermeniz veya Kutools for Excel's'i uygulamanız gerekir. Gizle> Tüm Aralıkları Göster Yarar.

Kutools for Excel yüklüyse, Kaydırma Alanını Ayarla yardımcı program, mevcut çalışma sayfasında yalnızca bir yazdırma alanını kolayca göstermenize yardımcı olacaktır.

Adım 1: Mevcut çalışma sayfasındaki yazdırma alanını seçin.

not: Baskı alanını hızlı bir şekilde bulamazsanız, tuşuna basabilirsiniz. F5 Git iletişim kutusunu açmak için tuşuna basın, yazdırma alanı adını seçin ve OK düğmesi aşağıda gösterilen ekran görüntüsü gibi. Ancak bu yöntem, mevcut çalışma sayfasındaki tüm yazdırma alanlarını seçecektir.

Adım 2: Kutools > Göster / Gizle > Kaydırma Alanını Ayarla.

Ardından, aşağıda gösterilen ekran görüntüsü gibi, mevcut çalışma sayfasında aynı anda yalnızca seçili yazdırma alanının gösterildiğini göreceksiniz:

Notlar:

1. Kutools for Excel's Kaydırma Alanını Ayarla geri almayı destekler ve Ctrl + Z gizli yazdırılmayan alanı göstermek için aynı anda tuşlarına basın.
2. Tıklayabilirsiniz Kutools > Göstermek / gizlemek > Tüm Aralıkları Göster yazdırılmayan gizli alanı hemen göstermek için.

Kaydırma konumunu ayarlayın veya diğer hücreleri gizleyin

Gizli aralıkları (sütunlar ve satırlar) göster

Diğer sayfaları gizle