Excel'deki gizli çalışma sayfalarının sayısını hızlı bir şekilde nasıl hesaplayabilirim?
Yüzlerce çalışma sayfası içeren büyük bir çalışma kitabınız varsa ve çalışma sayfalarından bazıları gizlenmişse. Bazı özel ihtiyaçları karşılamak için, çalışma kitabındaki gizli çalışma sayfalarının sayısını bilmek istiyorsunuz, bunları tek tek saymak yerine nasıl yapabilirsiniz? Şimdi, gizli çalışma sayfalarını aynı anda hızlı bir şekilde sayabilen iki numara tanıtacağım.
Bir çalışma kitabındaki gizli çalışma sayfalarının sayısını size söyleyen bir iletişim kutusu açabilen bir VBA kodu tanıtıyorum.
1. Basın Alt + F11 etkinleştirmek için anahtarlar Uygulamalar için Microsoft Visual Basic pencere.
2. tık Ekle > modülve aşağıdaki kodu yenisine yapıştırın modül pencere.
VBA: Gizli sayfaları sayın.
Sub vhCount()
'Updateby20150602
Dim xWs As Worksheet
Dim xCount As Integer
For Each xWs In Application.ActiveWorkbook.Sheets
If xWs.Visible Then xCount = xCount + 1
Next
MsgBox "Visible : " & xCount & vbCrLf & _
"Hidden : " & ActiveWorkbook.Sheets.Count - xCount
End Sub
3. Basın F5 kodu çalıştırmak için tuşuna basın ve size gizli çalışma sayfalarının sayısını ve görünen çalışma sayfalarının sayısını söyleyen bir iletişim kutusu açılır.
Kutools for Excel ile gizli / görünür sayfaları sayın
VBA'ya aşina değilseniz, ücretsiz kurulum yapabilirsiniz Kutools for Excel bir bakışta sayfaları, gizli sayfaları ve görünen sayfaları saymak için.
Kutools for Excel,ile daha fazla 300 kullanışlı fonksiyonlar, işlerinizi daha kolay hale getirir.
Yinelenen veya Benzersiz'i seçin Satırlar; Boş Satırları Seçin (tüm hücreler boştur); Süper Bul ve Bulanık Bul Birçok Çalışma Kitabında; Rastgele Seçim ...
Tam kopya Formül referansını değiştirmeden Birden Çok Hücre; Otomatik Referans Oluştur Birden Çok Sayfaya; Madde İşaretleri Ekle, Onay Kutuları ve daha fazlası ...
Metni Çıkar, Metin Ekle, Konuma Göre Kaldır, Alanı Kaldır; Sayfalama Alt Toplamları Oluşturma ve Yazdırma; Hücre İçeriği ve Yorumları Arasında Dönüştür...
Süper Filtre (filtre şemalarını kaydedin ve diğer sayfalara uygulayın); Gelişmiş Sıralama ay / hafta / gün, sıklık ve daha fazlasına göre; Özel Filtre kalın, italik ...
Çalışma Kitaplarını ve Çalışma Sayfalarını Birleştirin; Tabloları anahtar sütunlara göre birleştirin; Verileri Birden Çok Sayfaya Bölme; Toplu dönüştürme xls, xlsx ve PDF...
300'den fazla güçlü özellik. Office / Excel 2007-2021 ve 365'i destekler. Tüm dilleri destekler. Kuruluşunuzda veya kuruluşunuzda kolay devreye alma. Tam özellikler 30 günlük ücretsiz deneme. 60 günlük para iade garantisi.