Excel VBA Sayı Değerlerini Sayma

Excel VBA ile Sayı Değerlerini Sayma: IsNumeric, Count ve Döngü Yöntemleri
Excel VBA Sayı Değerlerini Sayma

1. Hemen Kullanılabilir 4 Adet VBA Sayı Değerlerini Sayma Kodu

📌 Bu bölümdeki kodlar: Dim ile değişken tanımlar, IsNumeric ile sayısal değerleri tespit eder, Application.WorksheetFunction.Count ile hızlı sayma yapar, For Each ile döngü oluşturur, MsgBox ile sonucu gösterir.

1. IsNumeric ile Sayıları Say

A sütunundaki sayısal değerleri sayar.

Sub IsNumericIleSay()
    Dim hucre As Range, sayac As Integer
    sayac = 0
    For Each hucre In Range("A:A")
        If IsNumeric(hucre.Value) Then sayac = sayac + 1
    Next
    MsgBox "Sayılar: " & sayac
End Sub

3. Döngü ile Sayıları Say

Seçili alandaki sayısal değerleri sayar.

Sub SeciliAlanSay()
    Dim hucre As Range, sayac As Integer
    sayac = 0
    For Each hucre In Selection
        If IsNumeric(hucre.Value) Then sayac = sayac + 1
    Next
    MsgBox "Sayılar: " & sayac
End Sub

2. Count ile Hızlı Say

A sütunundaki sayıları hızlıca sayar.

Sub CountIleHizliSay()
    Dim sayac As Integer
    sayac = Application.WorksheetFunction.Count(Range("A:A"))
    MsgBox "Sayılar: " & sayac
End Sub

4. Sonucu Hücreye Yaz

Sayı adedini B1 hücresine yazar.

Sub SonucuHucreyeYaz()
    Dim sayac As Integer
    sayac = Application.WorksheetFunction.Count(Range("A:A"))
    Range("B1").Value = sayac
End Sub

2. VBA Makroları için Ön Hazırlık

1. Geliştirici Sekmesini Aktifleştirin

Excel'de VBA kodlarını yazabilmek için önce Geliştirici sekmesini aktif etmelisiniz. Detaylı bilgi için tıklayın.

VBA - Geliştirici sekmesi
⚙️ Geliştirici sekmesini aktifleştirme

3. Modül Ekleyin

Kodlarınızı yazmak için bir Modül eklemelisiniz. Makro yazma rehberi için tıklayın.

VBA - Modül ekleme
📝 Modül ekleme

2. Visual Basic Düzenleyici'yi Açın

Alt + F11 (Windows) veya Option + F11 (Mac) ile hızlıca açabilirsiniz.

Visual Basic Düzenleyici'yi Açma
📝 Visual Basic Düzenleyici'yi Açma

4. Kodu Çalıştırın

Yazdığınız kodu çalıştırmak için F5 tuşuna basın veya Çalıştır butonuna tıklayın. VBA makro nedir? öğrenmek için tıklayın.

F5

▶️ Makroyu çalıştır

📋 Makro çalıştırma

3. Sıkça Sorulan Sorular

01 Excel VBA ile sayı değerleri nasıl sayılır?

IsNumeric, WorksheetFunction.Count veya döngü yöntemleri kullanılır. En yaygın yöntem: If IsNumeric(hucre.Value) Then kontrolüdür.

02 IsNumeric nedir?

IsNumeric, bir değerin sayısal olup olmadığını kontrol eden VBA fonksiyonudur. True veya False döndürür.

03 Hangi yöntem en hızlıdır?

Application.WorksheetFunction.Count(aralik) en hızlı yöntemdir. Büyük veri setlerinde tercih edilir.

04 Mac'te çalışır mı?

Evet, tüm yöntemler Mac'te de aynı şekilde çalışır.

05 Boş hücreler sayılır mı?

Hayır, IsNumeric boş hücre için False döndürür. Count da boş hücreleri saymaz.

06 Sonucu hücreye nasıl yazarım?

Range("B1").Value = sayac ile sonucu istediğiniz hücreye yazabilirsiniz.

💡 İpucu: Makroları çalıştırmadan önce dosyanızı yedeklemeyi unutmayın. Ctrl+S ile kaydedin.
🤖 Akıllı Arama Asistanı
💬 Merhaba! Size nasıl yardımcı olabilirim?
Excel Asistanı
👋 Merhaba! Excel ile ilgili ne öğrenmek istersin? Örn: DÜŞEYARA nasıl kullanılır?
DÜŞEYARA Pivot Tablo Gantt Şeması