Sayfa Üzerindeki Formüllerin Sayısını Bulma

Sayfa Üzerindeki Formüllerin Sayısını Bulma isimli kod, bir sayfa yer alan formüllerin kaç tane olduğunun sayısını veren bir makro örneğidir.

XD Destek İste
Sub CountFormSub()
    MsgBox ActiveSheet.UsedRange.SpecialCells(xlFormulas).Count
End Sub

Gerekli Adımlar

Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.

  1. Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
  2. Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
  3. Microsoft Excel Objects yazısının solundaki + simgesini tıklayın ve BuÇalışmaKitabı kısmına çift tıklayın.
  4. Üstteki kodu yapıştırın.

Kod Açıklaması

Bu kodu hangi sayfada çalıştırırsanız, o sayfadaki kullanılmış olan formüllerin sayısını verecektir.

Etiketler

50 Farklı Hazır Makro (VBA) Kodu
Excel ile Faiz Hesaplama Kodu
Makrolar ile Sonraki Sayfaya Geçmek
Açık Olan Tüm Excel Sayfalarını Kayıt Ederek Kapatma
Tarih ve Saatten Saati Kaldırma
Excel Makroları ile Klasör Arama
Makro ile Biçimleri Temizleme
Sayılara Yeni Bir Sayı Ekleme
Çalışma Kitabının Adını Tarih Olarak Kaydetme
TextBox Nesnelerinin Arasında Boşluk Bırakma
Metin Sarmayı Kaldırma
Sütunu Kes Kopyala ve Yapıştır
Pivot Tablo Alt Toplamlarını Gizleme
Otomatik Olarak Tarih ve Zaman Ekleme
Sağ Tık ile Açılan Menüye Ekleme Yapma
Sayıları Rastgele Karıştırmak
Makro Çalışırken İmlecin Hareket Etmemesini Sağlama
Aktif Hücreye Günün Tarihini Yazma
Veri Giriş Formunu Etkinleştirme
R1C1 Referans Stilini Etkinleştirme
Bir sayfadaki Veriyi Diğer Sayfaya Aktarma
Yorumları Yazdırma
Metinden Konuşma Oluşturma
Açılışta Üç Kere Şifre Hakkı Vermek
İçindekiler Tablosu Oluşturma
Adlandırılmış Aralıkları Vurgulama
Çalışma Kitabındaki Tüm Çalışma Sayfalarını Koruma
Hücrenin Arka Plan Rengini Değiştirme
Grafiği Görüntü Olarak Yapıştırma
Bir Dizeden Sayısal Veriler Elde Etme
Hedef Aramayı Kullanma
Sayıların Önündeki Tek Tırnak İşaretini Kaldırma
Belli Sütunlarda Alfabetik Sıralama
Pivot Verilerini Almayı Devre Dışı Bırakma Etkinleştirme
Boş Hücreleri Vurgulama
Bir Aralığa Alfabenin Harflerini Ekleme
Aktif Hücrenin Sütun Numarasını Bulma
Kes Kopyala ve Başka Çalışma Kitabına Yapıştır
Excel ile Demo Yapma Makrosu
Bağlantılı Resim Ekleme
Gizli Sayfaların Bulunması ve Gösterilmesi
UserForm Resize Özelliği Eklemek
Birleştirilmiş Hücrelerin Başlangıç Bitiş Sütununu Belirleme
56 Renk Kodunu Sıralama
Hesap Makinesini Açma
Şeffaf UserForm Oluşturma Kodu
Sayfadaki Grafikleri Yeniden Boyutlandırma
Excel Tam Ekran Yapma
Belirli Kriterlere Sahip Satırları Silme
Excel Makroları ile Dosya Taşıma
Seçilmiş Alanı Kes Kopyala ve Yapıştır
Üstteki alanda, Google Reklamları yerine sizin reklamınızın yayınlanmasını ister misiniz?
Reklam vermek istiyorum

Daha önce yorum yapılmamış!

Düşeyara formülünü kullanırken, aranan değer veri aralığında yoksa, #YOK hatası alırsınız. Bu hata sayısal değerlerde toplama, sayma, ortalama gibi sonuçların çalışmamasına neden olabilir.

Bu hata yerine bir değer ya da sayısal değerlerde 0 yazdırmak için EĞERHATA formülünü kullanabilirsiniz.
Yükleniyor...