VBA Sayısı - Excel VBA'da Sayma İşlevini Kullanarak Sayısal Değerleri Sayma

VBA Excel'de Sayma İşlevi

In VBA Sayısı fonksiyonu içinde değerlere sahip kaç sayı hücrelerinin, biz hatırlamak gerektiğini saymak için kullanıldığını çift tırnak içine alınır numaraları veya metin var hücreleri ya, değerleri doğrudan yazıldığında, bu hücreleri sayılır bu hücreler Excel ile çevrilemeyen rastgele verilere sahip olanlar sayılmaz.

VBA'da COUNT, çalışma sayfası işlev sınıfı aracılığıyla uygulanabilen bir çalışma sayfası işlevidir. Yerleşik bir işlev değildir. VBA COUNT işlevi, sağlanan değer aralığındaki tüm sayısal değerleri sayabilir.

Bu yazıda, COUNT işlevinin VBA'da nasıl kullanılacağını göstereceğiz.

VBA Sayım İşlevi Örnekleri

Çalışmasını anlamak için VBA Sayma İşlevinin bazı pratik örneklerini ele alalım.

VBA Sayımı Örneği # 1

Bu COUNT işlevini Excel VBA'da uygulamak için kodu kendi başınıza yazalım.

Adım 1: Alt prosedürü başlatarak makroyu başlatın.

Kod:

Sub Count_Example1 () End Sub

Adım 2: Şimdi, COUNT işlevinin sonucunu C2 hücresine kaydedeceğiz. Yani kodumuz "Aralık (" C2 ") olmalıdır. Değer =

Kod:

Alt Sayım_Örnek1 () Aralık ("C2"). Değer = Son Alt

Adım 3: Bir VBA yerleşik işlevi olmadığından, Çalışma Sayfası İşlev sınıfı aracılığıyla başvurmamız gerekir. Yani çalışma sayfası işlevi sınıfı aracılığıyla erişim.

Kod:

Sub Count_Example1 () Range ("C2"). Value = Worksheetfunction.Count (End Sub

Adım 4: Şimdi aralığı A1 - A7 olarak sağlayın.

Kod:

Alt Sayım_Örnek1 () Aralık ("C2"). Değer = Çalışma SayfasıFonksiyonu (Aralık ("A1: A7")) Son Alt

Tamam, bunlar sonuca ulaşmak için üç basit adım.

Şimdi sonucu C2 hücresinde görmek için kodu çalıştırın.

Her zamanki gibi, bir çalışma sayfasında VBA COUNT işlevini uyguladığımızda elde ettiğimiz gibi 3 sonuç aldık.

Formül çubuğunu gözlemlersek, formüle sahip değiliz. Daha ziyade formülün sonucunu aldık. Formülü C2 hücresine uygulamak için kodumuzu değiştirmemiz gerekir. Formülü uygulamak için kod aşağıdadır.

Kod:

Sub Count_Example1 () Range ("C2"). Value = "= Count (A1: A7)" End Sub

Bu VBA kodunu F5 tuşunu kullanarak veya manuel olarak çalıştırın. Ardından, bu formül C2 hücresine uygulanacaktır.

VBA Sayımı Örneği # 2

Şimdi, COUNT işleviyle bir örneğe daha bakın. Bu örnek için aşağıdaki verilere bakın.

A1'den A11'e kadar birkaç sayısal ve sayısal olmayan değerimiz var. Şimdi A1'den A11'e kadar olan sayısal değerleri saymak için aşağıdaki kodu uygulayacağım.

Kod:

Sub Count_Example2 () Range ("C2"). Value = "= Count (A1: A11)" End Sub

Yukarıdaki kodu manuel olarak veya F5 tuşunu kullanarak çalıştırdığımızda sonucu 5 olarak aldık.

Bununla birlikte, A1'den A11'e kadar olan verilere yakından baktığımızda A1, A2, A3, A4, A5, A7 ve A11 hücrelerinde sayısal değerlere sahibiz. Yani toplamda 7 hücrede sayısal değerlerimiz var, ancak formül sonucu yalnızca 5 olarak döndürdü.

Bunun nedeni, A5 ve A7 hücresindeki her hücreye yakından baktığımızda, değerlerin sayı olarak değil metin olarak depolanmasıdır. Dolayısıyla COUNT işlevi, sonucu yalnızca 5 olarak döndürmüştür, çünkü metin olarak biçimlendirilmiş veya kaydedilmiş hücreleri sayısal olmayan değerler olarak ele alır ve sayısal sayımı yok sayar.

Bunun gibi, listeden sayısal değerleri saymak için hem çalışma sayfalarının hem de VBA işlevlerinin bir parçası olarak Excel'de COUNT işlevini kullanabiliriz.

Ilginç makaleler...