Bir çalışma kitabında PivotTable olup olmadığını nasıl kontrol edebilirim?
Çalışma kitabınızda birden fazla Özet Tablo (PivotTable) varsa ve içinde belirli bir Özet Tablo olup olmadığını hızlıca öğrenmek istiyorsanız, genellikle Özet Tablo Seçenekleri iletişim kutusuna giderek adları tek tek kontrol edebilirsiniz. Ancak onlarca hatta yüzlerce Özet Tablo olduğunda bu yöntem son derece zaman alıcı ve yorucu hâle gelir. İşte tam bu noktada işinizi kolaylaştıracak pratik bir püf noktası!
Kullanıcı Tanımlı İşlev ile bir PivotTable'nin çalışma kitabında olup olmadığını kontrol edin
Kullanıcı Tanımlı İşlev ile bir PivotTable'nin çalışma kitabında olup olmadığını kontrol edin
Geçerli çalışma kitabında bir Özet Tablo olup olmadığını hızlıca öğrenmek için bir kullanıcı tanımlı işlev oluşturabilirsiniz.
1. PivotTable'ın varlığını kontrol etmek istediğiniz çalışma kitabını açın.
2. ALT + F11 tuşlarına basılı tutun; bu işlem, Microsoft Visual Basic for Applications penceresini açar.
3. Ekle > Modül seçeneğine tıklayın ve aşağıdaki kodu Modül Penceresine yapıştırın.
VBA kodu: Bir PivotTable'nin çalışma kitabında olup olmadığını kontrol edin
Function PivotExist(Name As String) As Boolean
'Update 20141112
Dim sh As Worksheet
Dim pt As PivotTable
PivotExist = False
For Each sh In ActiveWorkbook.Worksheets
For Each pt In sh.PivotTables
If pt.Name = Name Then
PivotExist = True
Exit For
End If
Next
Next
End Function
4. Ardından bu kodu Kaydet ve Kapat, çalışma sayfanıza geri dönün ve boş bir hücreye şu formülü girin:=pivotexist("salereport") (ekran görüntüsüne bakın):
Notlar: (1.) Yukarıdaki formülde “salereport”, varlığını kontrol etmek istediğiniz Özet Tablo adıdır.
(2.) PivotTable adını çift tırnak işaretleri arasına girmelisiniz ve ad büyük/küçük harfe duyarlı olmalıdır.
5. Formülü girdikten sonra Enter tuşuna basın; hücrenizde DOĞRU görürseniz PivotTable mevcuttur, YANLIŞ görürseniz PivotTable mevcut değildir.
İlgili makaleler:
Bir çalışma kitabındaki tüm PivotTable’leri nasıl listeleyebilirim?
PivotTable’a birden fazla alan nasıl eklenir?
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar