Excel'de yorum içeren hücre sayısını nasıl sayarsınız?

Bir çalışma sayfasındaki yorum sayısını saymayı denediniz mi? Bu makalede, bir çalışma sayfasındaki yorum içeren hücreleri saymak için size bazı hızlı ipuçları tanıtacağım.

Git ve Özel İşlev ile yorum içeren hücre sayısını sayma

Kullanıcı Tanımlı İşlev ile yorum içeren hücre sayısını sayma

VBA kodu ile yorum içeren hücre sayısını sayma

Git ve Özel İşlev ile yorum içeren hücre sayısını sayma

Excel'deki Git ve Özel özelliğini kullanarak, önce tüm yorum hücrelerini seçebilir ve ardından durum çubuğunda sayım sayısını görebilirsiniz.

1. Git tuşuna tıklayın Ana Sayfa > Bul ve Seç > Git ve Özel, ekran görüntüsüne bakın:

2. Git ve Özel iletişim kutusunda, lütfen Seç bölümü altında Yorumlar seçeneğini işaretleyin, ekran görüntüsüne bakın:

3. Ardından Tamam düğmesine tıklayarak bu iletişim kutusunu kapatın ve yorum içeren etkin çalışma sayfasındaki tüm hücreler anında seçilir. Ve durum çubuğunda yorumların sayısını görebilirsiniz. Ekran görüntüsüne bakın:

Not: Yorum içeren boş hücreleriniz varsa, boş hücre yorumları sayılmaz.

İpucu: Ayrıca Ctrl + G kısayollarını kullanarak Git iletişim kutusunu açabilir ve Özel düğmesine tıklayarak Git ve Özel iletişim kutusunu gösterebilirsiniz.

Kullanıcı Tanımlı İşlev ile yorum içeren hücre sayısını sayma

Yukarıdaki yöntemin kendine özgü dezavantajı vardır, bu nedenle tüm hücre yorumlarını, boş hücre yorumlarını da içerecek şekilde saymak için bir Kullanıcı Tanımlı İşlev oluşturabiliriz.

1. ALT + F11 tuşlarını basılı tutun ve Microsoft Visual Basic for Applications penceresi açılır.

2. Ekle'ye tıklayın > Modül ve aşağıdaki kodu Modül Penceresine yapıştırın.

VBA kodu: Yorum içeren hücre sayısını sayma

Function CountComments(xCell As Range)
'Update 20140924
    Application.Volatile
    CountComments = xCell.Parent.Comments.Count
End Function

3. Ardından kodu kaydedip kapatın, çalışma sayfasına geri dönün, boş bir hücreye şu formülü girin: =countcomments(A1), (A1 bir hücre başvurusudur, bunu herhangi bir diğer hücre adresine değiştirebilirsiniz), ekran görüntüsüne bakın:

4. Ardından Enter tuşuna basın ve hücre yorumlarının sayısını elde edeceksiniz.

VBA kodu ile yorum içeren hücre sayısını sayma

Aşağıdaki VBA kodu da tüm hücre yorumlarını, boş hücre yorumlarını da içerecek şekilde saymanıza yardımcı olabilir.

1. ALT + F11 tuşlarını basılı tutun ve Microsoft Visual Basic for Applications penceresi açılır.

2. Ekle'ye tıklayın > Modül ve aşağıdaki kodu Modül Penceresine yapıştırın.

VBA kodu: Yorum içeren hücre sayısını sayma

Sub CountComments()
'Update 20140924
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeComments)
If VBA.Err > 0 Then
    MsgBox 0
Else
    MsgBox WorkRng.Count
End If
End Sub

3. Ardından bu kodu çalıştırmak için F5 tuşuna basın ve saymak istediğiniz hücre yorumlarının veri aralığını seçmenizi hatırlatmak için bir uyarı kutusu açılacaktır. Ekran görüntüsüne bakın:

4. Ve sonra Tamam'a tıklayın, seçimdeki hücre yorumlarının sayısını elde edeceksiniz.

İlgili makaleler:

Excel'de tüm yorumları yeni bir çalışma sayfasına veya çalışma kitabına nasıl listelersiniz?

Excel'de yorumlar içindeki metni nasıl bulup değiştirirsiniz?

Excel'de birden fazla hücreye hızlıca yorum ekleme