Excel'de belirtilen veya etkin olan dışındaki tüm çalışma sayfalarını nasıl gizleyebilirim?

Çalışma kitabını temiz tutmak ve gezinmeyi kolaylaştırmak için, Excel'deki geçerli etkin olan dışındaki tüm çalışma sayfalarını gizlemek isteyebilirsiniz. Bu makalede, size tüm çalışma sayfalarını gizlemek için iki yöntem göstereceğiz, ancak Excel'de belirtilen veya etkin olanı göstereceğiz.

Tüm çalışma sayfalarını ancak belirtilen Excel'de VBA kodu ile gizle
Kutools for Excel ile tüm çalışma sayfalarını ancak aktif olanı gizle (sadece birkaç tıklama)

Tüm çalışma sayfalarını ancak belirtilen Excel'de VBA kodu ile gizle

Excel'de VBA kodu ile belirtilen dışındaki tüm çalışma sayfalarını gizleyebilirsiniz. Lütfen aşağıdaki işlemleri yapın.

1. Açık olan çalışma kitabında, yalnızca göstermek istediğiniz çalışma sayfasına gidin ve ardından Ara Toplam + F11 aynı anda Microsoft Visual Basic Uygulaması pencere.

2. içinde Microsoft Visual Basic Uygulaması Pencere, tıklayın Ekle > modül. Ekran görüntüsüne bakın:

3. Ardından aşağıdaki VBA kodunu kopyalayıp Kod düzenleyiciye yapıştırın.

VBA kodu: belirtilen hariç tüm sayfaları gizle

Sub SheetHidden()
	Dim xWs As Worksheet
	Dim xName As String
	xName = Application.InputBox("Range", xTitleId, Application.ActiveSheet.Name, Type: = 2)
	For Each xWs In Application.ActiveWorkbook.Worksheets
		If xWs.Name <> xName Then
			xWs.Visible = xlSheetHidden
		End If
	Next
End Sub

4. Tuşuna basın. F5 kodu çalıştırmak için anahtar.

5. Kodu çalıştırdıktan sonra, aktif sayfa adının ekranda görüntülendiği bir iletişim kutusu açılır. Aralık kutusunu tıklayın ve ardından OK düğmesine basın.

Ardından, çalışma kitabınızdaki geçerli olan hariç tüm çalışma sayfaları hemen gizlenir.

not: Gizli çalışma sayfalarını görüntülemek için lütfen aşağıdaki VBA kodunu Modüle kopyalayıp yapıştırın ve ardından kodu çalıştırmak için F5 tuşuna basın.

VBA kodu: gizli çalışma sayfalarını göster

Sub SheetUnHidden()
	Dim xWs As Worksheet
	For Each xWs In Application.ActiveWorkbook.Worksheets
		xWs.Visible = True
	Next
End Sub

Kutools for Excel ile tüm çalışma sayfalarını ancak aktif olanı gizle (yalnızca tek tıklama)

Excel'de tek bir tıklama ile belirtilen veya aktif olan dışındaki tüm sayfaları gizleyebilirsiniz.

1. Yalnızca geçerli çalışma kitabında gösterilmesini istediğiniz belirtilen sayfaya girin.

2. Sonra tıklayın Kutools > Göster ve Gizle > Seçilmemiş Sayfaları Gizle.

Ardından, geçerli çalışma kitabındaki tüm sayfalar, etkin olan dışında gizlenir.

not: Tüm gizli çalışma sayfalarını görüntülemek istiyorsanız, lütfen tıklayın Kutools > Göster / Gizle > Tüm Sayfaları Göster. Ekran görüntüsüne bakın: