Çalışma kitabındaki tüm görünür veya gizli sayfaları nasıl listelersiniz?

Eğer içinde bazı gizli çalışma sayfaları bulunan büyük bir çalışma kitabınız varsa ve şu anda, aşağıdaki ekran görüntüsünde gösterildiği gibi, bir çalışma sayfasında tüm görünür ve gizli sayfaları ayrı ayrı listelemeniz gerekiyorsa bu makalede, Excel'de tüm görünür ve gizli sayfaları nasıl listeleyeceğinizi anlatacağım.

VBA kodu ile tüm görünür ve gizli sayfaları ayrı ayrı listeleme

Kutools for Excel ile Excel'deki tüm görünür sayfaları listeleme

VBA kodu ile tüm görünür ve gizli sayfaları ayrı ayrı listeleme

Bir çalışma sayfasında görünür ve gizli sekme adlarını listelemek için aşağıdaki VBA kodu size yardımcı olabilir, lütfen şu adımları izleyin:

1. Microsoft Visual Basic for Applications penceresini açmak için ALT + F11 tuşlarına basın.

2. Ekle Insert > Modül seçeneğine tıklayın ve aşağıdaki kodu Modül Penceresine yapıştırın.

VBA Kodu: Tüm görünür ve gizli sayfaları ayrı ayrı listeleme:

Sub NameSheets()
'Updateby Extendoffice
    Dim x As Long, y As Long, z As Long
    Dim ws As Worksheet
    Dim shtCnt As Integer
    x = 1
    y = 1
    z = 1
    shtCnt = ThisWorkbook.Sheets.Count
    On Error Resume Next
    Application.ScreenUpdating = False
    Sheets.Add After:=Sheets(Sheets.Count)
    For i = 1 To shtCnt
        If Sheets(i).Visible = xlSheetHidden Then
            Cells(x, 2) = Sheets(i).Name
            x = x + 1
        End If
        If Sheets(i).Visible = xlSheetVisible Then
           Cells(y, 1) = Sheets(i).Name
            y = y + 1
        End If
        If Sheets(i).Visible = xlSheetVeryHidden Then
            Cells(z, 3) = Sheets(i).Name
            z = z + 1
        End If
    Next i
    Application.ScreenUpdating = True
End Sub

3. Ardından bu kodu çalıştırmak için F5 tuşuna basın, tüm görünür, gizli ve çok gizli sayfalar aşağıdaki ekran görüntüsünde gösterildiği gibi yeni bir sayfada ayrı ayrı listelenir:

Kutools for Excel ile Excel'deki tüm görünür sayfaları listeleme

Eğer Kutools for Excel'iniz varsa, Çalışma Sayfası Adları Listesi Oluştur özelliği ile mevcut çalışma kitabının tüm görünür sayfalarını her bir sekmeye bağlantılarla hızlıca listeleyebilirsiniz.

Kutools for Excel'i yükledikten sonra lütfen şu adımları izleyin:

1. Kutools Plus > Çalışma Sayfası > Çalışma Sayfası Adları Listesi Oluştur seçeneğine tıklayın, aşağıdaki ekran görüntüsüne bakın:

2. Çalışma Sayfası Adları Listesi Oluştur iletişim kutusunda:

(1.) Sayfa İndeks Stilleri bölümünde Bağlantılar Oluştur seçeneğini seçin;

(2.) Sayfa indeksi için bir çalışma sayfası adı girin.

(3.) Çalışma sayfası indeksinin konumunu belirtin.

(4.) Sayfa indeksinde çalışma sayfası adlarını kaç sütunda görüntülemek istediğinizi belirtin.

3. Ve ardından Tamam düğmesine tıklayın, tüm görünür sayfalar gizli sayfalar hariç yeni bir sayfaya listelenmiştir, aşağıdaki ekran görüntüsüne bakın: