Excel'de üstü çizili hücreleri nasıl sayarsınız / toplarsınız?

Excel'de, verileri eski, ilgisiz veya geçersiz olarak işaretlemek için belirli hücrelere üstü çizili biçimlendirme uygulamak yaygındır. Bu görsel ipucu, veri yönetimini büyük ölçüde iyileştirebilir ve analiz sırasında önemli olan bilgilere odaklanmanıza yardımcı olabilir. Ancak, sayma veya toplama gibi hesaplamalar yapmak gerektiğinde, üstü çizili olmayan hücrelerden ayrı olarak üstü çizili hücreler için sonuçları ayırmak isteyebilirsiniz. Bu senaryolarla nasıl başa çıkacağınızı anlamak, iş akışınızı hızlandırabilir ve daha doğru içgörülere yol açabilir. Bu makale, Excel'de üstü çizili biçimlendirmesi olan veya olmayan hücreleri saymak ve toplamak için birkaç pratik yöntem sunar; bu yöntemler, çeşitli veri yönetimi ihtiyaçları için esneklik sağlayan özelleştirilebilir VBA fonksiyonlarını kullanır.

Excel'de VBA ile üstü çizili hücreleri sayma

Excel'de VBA ile üstü çizili olmayan hücreleri sayma

Excel'de VBA ile üstü çizili hücreleri hariç tutarak toplama

Kutools for Excel Kullanarak Üstü Çizili Hücreleri Sayma veya Toplama

Excel'de üstü çizili hücreleri sayma

Belirli bir aralıktaki üstü çizili biçimlendirmeyle biçimlendirilmiş hücrelerin toplam sayısını belirlemeniz gerekiyorsa, Excel'in yerleşik fonksiyonlarıyla doğrudan gerçekleştirilemez, çünkü üstü çizili gibi metin biçimlendirmesini tanıyan bir formül yoktur. Bu nedenle, VBA'da Kullanıcı Tanımlı Fonksiyon (UDF) kullanmak pratik bir çözüm haline gelir. Bu yaklaşım, yapılacaklar listelerini yönetirken, envanter güncellemelerinde veya üstü çizili tamamlanmış, geçersiz veya eski veri noktalarını göstermek için kullanıldığında özellikle yararlıdır.

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

2. VBA penceresinde, yeni bir modül oluşturmak için Ekle > Modül'e tıklayın ve ardından aşağıdaki kodu Modül Penceresine yapıştırın.

VBA kodu: Üstü çizili hücreleri sayma

Public Function CountStrike(pWorkRng As Range) As Long
'Update 20140819
Application.Volatile
Dim pRng As Range
Dim xOut As Long
xOut = 0
For Each pRng In pWorkRng
    If pRng.Font.Strikethrough Then
        xOut = xOut + 1
    End If
Next
CountStrike = xOut
End Function

3. Kodu girdikten sonra, çalışma kitabınızı kaydedin (makroyu korumak için), ardından VBA düzenleyicisini kapatın ve çalışma sayfanıza dönün. Sonucun görünmesini istediğiniz herhangi bir boş hücreye şu formülü girin (örneğin, A2:B14 aralığındaki üstü çizili hücreleri kontrol etmek için): =CountStrike(A2:B14)

İpucu: A2:B14'ü denetlemek istediğiniz başka bir aralıkla değiştirebilirsiniz.

4. Formülü çalıştırmak için Enter tuşuna basın ve Excel, belirtilen aralıktaki tüm üstü çizili hücrelerin sayısını hemen görüntüleyecektir. Bu, ilerlemeyi etkili bir şekilde izlemenizi veya gereksiz girişleri kaldırmayı sağlar. Ekran görüntüsüne bakın:

Önlem: Bu VBA kodunun gelecekte de kullanılabilir olmasını sağlamak için dosyayı .xlsm (Makro Etkin Excel Çalışma Kitabı) formatında kaydetmelisiniz.

Excel'de üstü çizili olmayan hücreleri sayma

Bazı durumlarda, belirli bir aralıktaki üstü çizili biçimlendirme içermeyen hücrelerin sayısını bulmanız gerekebilir. Örneğin, proje takip tablolarında veya satış verilerinde yalnızca etkin/geçerli girişleri (yani, üstü çizili olmayanları) saymak isteyebilirsiniz. Excel'in varsayılan COUNT veya COUNTA fonksiyonları metin biçimlendirmesini görmezden gelir, bu nedenle özel bir VBA çözümü bu tür ihtiyaçlar üzerinde hassas bir kontrol sağlar.

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

2. Yeni bir kod modülü eklemek için Ekle > Modül'e gidin. Aşağıdaki kodu o modül penceresine yapıştırın.

VBA kodu: Üstü çizili olmayan hücreleri sayma

Public Function CountNoStrike(pWorkRng As Range) As Long
'Update 20140819
Application.Volatile
Dim pRng As Range
Dim xOut As Long
xOut = 0
For Each pRng In pWorkRng
    If Not pRng.Font.Strikethrough Then
        xOut = xOut + 1
    End If
Next
CountNoStrike = xOut
End Function

3. Makro etkin çalışma kitabınızı kaydedin, çalışma sayfasına dönün ve boş bir hücreye formülü girin (örneğin, A2:B14 için): =countnostrike(A2:B14) Ardından, sonucu almak için Enter'a basın. Excel, seçilen aralıktaki üstü çizili olmayan hücreleri sayacaktır.

Not: Yukarıdaki örnekte, A2:B14 değerlendirilen hücrelerin aralığıdır. Çalışma sayfanız için aralık başvurusunu gerektiği gibi ayarlayın. Ayrıca, birleştirilmiş hücreler veya özel biçimlendirme bazen sonuçları etkileyebilir—aralığınızın yalnızca amaçlanan hücreleri içerdiğinden emin olun.

Excel'de üstü çizili hücreleri hariç tutarak toplama

Artık aktif olmayan veya görmezden gelinmesi gereken (yani, üstü çizili biçimlendirme içeren) sayısal verilerle uğraşırken, yalnızca geçerli sayıları toplamak genellikle çok önemlidir. Bütçe tablolarında, envanter yönetimi veya görev takibinde bu yaygın bir durumdur; burada üstü çizili girişler artık kullanılmayan veya tamamlanmış öğeleri temsil eder ve toplamlardan çıkarılmalıdır. Excel'in yerleşik SUM fonksiyonu biçimlendirilmiş ve biçimsiz hücreler arasında ayrım yapmadığından, bu işlem için Kullanıcı Tanımlı VBA Fonksiyonuna ihtiyaç duyulur.

1. Microsoft Visual Basic for Applications düzenleyiciyi açmak için ALT + F11 tuşlarını kullanın.

2. Bir modül eklemek için Ekle > Modül'e tıklayın ve aşağıdaki kodu o modül penceresine yapıştırın.

VBA kodu: Üstü çizili hücreleri hariç tutarak toplama

Public Function ExcStrike(pWorkRng As Range) As Long
'Update 20140819
Application.Volatile
Dim pRng As Range
Dim xOut As Long
xOut = 0
For Each pRng In pWorkRng
    If Not pRng.Font.Strikethrough Then
        xOut = xOut + pRng.Value
    End If
Next
ExcStrike = xOut
End Function

3. VBA düzenleyicisini kaydedin ve kapatın. Hedef çalışma sayfanızda, boş bir hücre seçin ve aşağıdaki formülü girin (örneğin, B2:B14 için): =excstrike(B2:B14) Enter'a basın ve Excel, belirttiğiniz aralıktaki üstü çizili olmayan hücreleri toplayacak, böylece eski değerleri hariç tutan bir toplam anında verecektir.

Not: B2:B14'ü gerçek veri aralığınıza göre ayarlayın. Bu fonksiyon, değerlerine bakılmaksızın üstü çizili hücreleri görmezden gelir. Beklenmedik sonuçlar alıyorsanız, tüm hücrelerin sayısal girişler içerdiğinden ve doğru biçimlendirme olduğundan emin olun.

Pratik ipucu: Herhangi bir hücrenin üstü çizili durumunu değiştirdikten sonra toplamayı yenilemeniz gerekiyorsa, çalışma sayfasını yeniden hesaplamak için F9 tuşuna basın.

Kutools for Excel Kullanarak Üstü Çizili Hücreleri Sayma veya Toplama

Yalnızca üstü çizili biçimlendirme içeren hücreleri saymak veya toplamak istiyorsanız, Excel bunun için yerleşik bir yol sunmaz—ancak Kutools for Excel, Özel Filtre özelliğiyle bunu kolaylaştırır.

1. Sütunu Seçin

Üstü çizili biçimlendirme içeren hücrelerin bulunduğu sütuna tıklayın.

2. Özel Filtreyi Açın

Kutools Plus sekmesine gidin, ardından Özel Filtre > Üstü Çizili Filtrele'ye tıklayın.

3. Filtreyi Onaylayın

Koşulu karşılayan kaç hücre olduğunu gösteren bir iletişim kutusu açılacaktır. Devam etmek için Tamam'a tıklayın.

4. Sonuçları Görüntüleyin

Üstü çizili olan hücreler şimdi filtrelendi ve görülebilir. Filtrelenmiş aralığı seçin—Excel'in alt kısmındaki durum çubuğunda anında Toplam, Ortalama ve Sayı göreceksiniz.

✨ Neden Kutools Kullanmalı?

Kutools for Excel, bu gibi 300'den fazla güçlü ve kullanımı kolay özellik sunar—karmaşık formüller yazmadan veya VBA kodu kullanmadan zaman kazanmanıza ve üretkenliğinizi artırmanıza yardımcı olur.

Biçime göre filtreleme, veri temizleme, sayfaları birleştirme veya toplu düzenleme yaparken, Kutools işinizi saniyeler içinde basitleştirir.

 Kutools for Excel'i 30 gün boyunca ücretsiz deneyin ve eksikliğini hissettiğiniz özellikleri keşfedin!

İlgili makaleler:

Excel'de bir hücre aralığındaki kalın sayıları nasıl toplarsınız / sayarsınız?

Excel'de arka plan rengine göre hücreleri nasıl sayarsınız / toplarsınız?

Excel'de yazı tiplerine göre hücreleri nasıl sayarsınız / toplarsınız?