Bir çalışma kitabındaki görünür sayfaların sayısını nasıl sayarsınız?

Birden fazla sayfa içeren büyük bir çalışma kitabında, bazı sayfalar görünür, bazı sayfalar ise gizlidir. Bazı durumlarda, çalışma kitabındaki görünür sayfaların toplam sayısını bulmanız gerekebilir. Bunu kısa sürede nasıl yapabilirsiniz? Size bu işlemi hızlıca gerçekleştirmeniz için birkaç yöntem sunuyorum.

Görünür sayfaların sayısını yalnızca VBA ile sayma

Kutools for Excel ile görünür sayfalar/gizli sayfalar/tüm sayfaların sayısını sayma

Görünür sayfaların sayısını yalnızca VBA ile sayma

Excel'de, görünür sayfaları tek tek saymak yerine, görünür sayfaların sayısını hızlıca saymak için VBA kullanabilirsiniz.

1. Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın, ardından Ekle > Modül'e tıklayarak yeni bir Modül açın.

2. Aşağıdaki VBA kodunu Modül penceresine yapıştırın.

VBA: Bir çalışma kitabındaki görünür sayfaların sayısını sayma

Sub VisibleSheetsCount()
'UpdatebyKutoolsforExcel20150909
    Dim xSht As Variant
    Dim I As Long
    For Each xSht In ActiveWorkbook.Sheets
        If xSht.Visible Then I = I + 1
    Next
    MsgBox I & " sheets are visible", , "Kutools for Excel"
End Sub

3. Çalıştır düğmesine basın. Görünür sayfaların sayısını belirten bir iletişim kutusu açılacaktır.

Kutools for Excel ile görünür sayfalar/gizli sayfalar/tüm sayfaların sayısını sayma

Eğer VBA ile ilgili deneyiminiz yoksa, görünür sayfaların, gizli sayfaların ve tüm sayfaların sayısını hızlıca görüntülemek için Kutools for Excel'in Gezinme bölmesini kullanabilirsiniz.

1. Görünür sayfaların sayısını saymak istediğiniz çalışma kitabını etkinleştirin ve Kutools > Gezinme'ye tıklayın. Ekran görüntüsüne bakın:

2. Gezinme bölmesi, geçerli sayfanın sol tarafında görünecektir. Çalışma Kitabı ve Sayfa sekmesine tıklayarak Çalışma Kitabı ve Sayfa bölümüne gidin. Bölmenin alt kısmında, görünür sayfaların, gizli sayfaların ve tüm sayfaların (hem görünür hem de gizli olanlar) sayısını görebilirsiniz. Ekran görüntüsüne bakın:

Gezinme bölmesini gizlemek isterseniz, sadece Kutools > Gezinme'ye tıklayarak kapatın.

Kutools for Excel'in Gezinme bölmesi oldukça güçlüdür. Bu araçla, sayfalar listesini, hücre adları listesini, sütun başlıkları listesini görüntüleyebilir, ayrıca aralıkları, resimleri, formülleri otomatik metinler olarak ekleyebilirsiniz. Ayrıca seçili sayfalar arasında bir kelimeyi bulabilir ve değiştirebilirsiniz. Gezinme bölmesi hakkında daha fazla bilgi almak için buraya tıklayın.