Excel'deki bir hücre aralığındaki kalın sayıları nasıl toplayabilirim / sayabilirim?
Bir çalışma sayfasında bazı kalın sayılar içeren bir veri aralığınız olduğunda ve şimdi yalnızca kalın hücreleri toplamak veya saymak istediğinizde, elbette bunları tek tek elle ekleyebilirsiniz, ancak bu zaman alıcı olacaktır. Excel'de yalnızca kalın hücreleri kolay ve hızlı bir şekilde nasıl toplayabilir veya sayabilirsiniz?
Kullanıcı Tanımlı İşlevle (VBA ve formül) bir aralıktaki kalın sayıları sayın
Kullanıcı Tanımlı İşlevle (VBA ve formül) bir aralıktaki kalın sayıları toplama
Kutools for Excel ile bir aralıktaki kalın hücreleri saymak ve toplamak için birkaç tıklama
Kullanıcı Tanımlı İşleviyle bir aralıktaki kalın sayıları sayın
Aşağıdaki Kullanıcı Tanımlı İşlev kalın hücre sayısını hızlı bir şekilde almanıza yardımcı olabilir. Lütfen şunu yapın:
1. Basılı tutun ALT + F11 anahtarlar ve açılır Uygulamalar için Microsoft Visual Basic penceresi.
2. tıklayın Ekle > modülve aşağıdaki kodu Modül Penceresi.
VBA kodu: Bir hücre aralığında kalın sayıları sayın
Function CountBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xCount As Double
For Each Rng In WorkRng
If Rng.Font.Bold Then
xCount = xCount + 1
End If
Next
CountBold = xCount
End Function
3. Ardından bu kodu kaydedin ve bu formülü yazın = Kalın Kalın (A1: C9) boş bir hücreye, ekran görüntüsüne bakın:
4. Daha sonra tuşuna basın. Keşfet tuşuna basın ve A1: C9 aralığındaki kalın hücreleri sayacaksınız.
Not:A1: C9 Formülde kalın hücreleri saymak için fonksiyonu kullanmak istediğiniz aralığı belirtir, ihtiyacınıza göre değiştirebilirsiniz.
Kullanıcı Tanımlı İşleviyle bir aralıktaki kalın sayıları toplama
Ve bir veri aralığındaki yalnızca kalın sayıları toplamak isterseniz, çözmeniz için kullanıcı tanımlı bir işlev de oluşturabilirim.
1. basılı tutun ALT + F11 anahtarlar ve açılır Uygulamalar için Microsoft Visual Basic penceresi.
2. tıklayın Ekle > modülve aşağıdaki kodu Modül Penceresi.
VBA kodu: Bir hücre aralığında kalın sayıları toplayın
Function SumBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xSum As Double
For Each Rng In WorkRng
If Rng.Font.Bold Then
xSum = xSum + Rng.Value
End If
Next
SumBold = xSum
End Function
3. Ardından bu kodu kaydedin ve bu formülü yazın = sumbold (A1: C9) boş bir hücreye, ekran görüntüsüne bakın:
4. Ve sonra tuşuna basın. Keşfet tuşu, A1: C9 aralığındaki tüm kalın sayılar eklendi. Ekran görüntüsüne bakın:
Not:A1: C9 Formülde kalın hücreleri toplamak için işlevi kullanmak istediğiniz aralığı belirtir, ihtiyacınıza göre değiştirebilirsiniz.
Kutools for Excel ile bir aralıktaki kalın hücreleri saymak ve toplamak için birkaç tıklama
You, karmaşık VBA kodunu kullanmadan ve formülleri hatırlamadan, bir aralıktaki tüm kalın hücreleri birkaç tıklama ile kolayca sayabilir veya toplayabilir.
Başvurmadan önce Kutools for ExcelLütfen önce indirin ve kurun.
1. Kalın hücreleri saymak için, lütfen sonucu bulmak için boş bir hücre seçin ve ardından Kutools > Kutools İşlevleri > İstatistik ve Matematik > COUNTBYFONTBOLD.
Ve kalın hücreleri toplamak için tıklayın Kutools > Kutools İşlevleri > İstatistik ve Matematik > ÖZETFONTBOLD. Ekran görüntüsüne bakın:
2. F'deunction Argümanlar iletişim kutusunda, saymanız veya toplamanız gereken kalın hücreli aralığı Referans kutusunda belirtin ve ardından OK düğmesine basın.
Şimdi, belirtilen aralıktaki tüm kalın hücrelerin sayımı veya toplamı, seçilen hücreye hemen doldurulur. Ekran görüntüsüne bakın:
Bu yardımcı programın ücretsiz denemesine (30 günlük) sahip olmak istiyorsanız, indirmek için lütfen tıklayınızve ardından yukarıdaki adımlara göre işlemi uygulamaya gidin.
Kutools for Excel ile formül hücresi referansını sabit tutun
İlgili Makaleler:
Excel'deki tüm kalın hücreler veya metinler nasıl belirlenir ve seçilir?
En İyi Ofis Üretkenlik Araçları
Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar. En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...
Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir
- Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
- Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
- Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!