Kiraan VBA

Fungsi Kira dalam VBA Excel

Dalam fungsi VBA Count digunakan untuk menghitung berapa banyak sel yang mempunyai nilai di dalamnya, kita perlu ingat bahawa sel yang mempunyai nombor atau teks yang disertakan dalam tanda petik ganda atau sel yang nilainya ditaip secara langsung dihitung, sel-sel tersebut yang mempunyai data rawak yang tidak dapat diterjemahkan oleh excel tidak dikira.

Dalam VBA COUNT adalah fungsi lembaran kerja yang dapat diterapkan melalui kelas fungsi lembaran kerja. Ia bukan fungsi terbina dalam. Fungsi COUNT VBA dapat mengira semua nilai berangka dari julat nilai yang disediakan.

Dalam artikel ini, kami akan menunjukkan kepada anda cara menggunakan fungsi COUNT di VBA.

Contoh Fungsi Kiraan VBA

Mari kita ambil beberapa contoh praktikal VBA Count Function untuk memahami cara kerjanya.

Anda boleh memuat turun Templat Fungsi Hitungan VBA ini di sini - Templat Fungsi Hitungan VBA

Contoh Kiraan VBA # 1

Mari tulis kod anda sendiri untuk menerapkan fungsi COUNT ini di excel vba.

Langkah 1: Mulakan makro dengan memulakan prosedur Sub.

Kod:

 Sub Count_Contoh1 () Sub Akhir 

Langkah 2: Sekarang kita akan menyimpan hasil fungsi COUNT di sel C2. Jadi kod kami harus seperti "Range (" C2 "). Nilai =

Kod:

 Sub Count_Contoh1 () Julat ("C2"). Nilai = Sub Akhir 

Langkah 3: Oleh kerana ia bukan fungsi terbina dalam VBA, kita perlu menerapkannya melalui kelas Fungsi Lembaran Kerja Jadi akses melalui kelas fungsi lembaran kerja.

Kod:

 Sub Count_Example1 () Julat ("C2"). Nilai = Fungsi Lembaran Kerja.Kira (Sub Akhir 

Langkah 4: Sekarang berikan julat dari A1 hingga A7.

Kod:

 Sub Count_Example1 () Julat ("C2"). Nilai = Lembaran KerjaFungsi.Jumlah (Julat ("A1: A7")) Sub Akhir 

Ok, ini adalah tiga langkah mudah untuk mencapai hasilnya.

Sekarang jalankan kod untuk melihat hasilnya di sel C2.

Seperti biasa, kami mendapat hasil sebanyak 3 seperti bagaimana kami mendapat ketika menerapkan fungsi VBA COUNT dalam lembaran kerja.

Sekiranya kita melihat formula, kita tidak mendapat formula sebaliknya kita hanya mendapat hasil formula. Untuk menerapkan formula ke sel C2, kita perlu mengubah kod kita. Berikut adalah kod untuk menggunakan formula.

Kod:

 Sub Count_Contoh1 () Julat ("C2"). Nilai = "= Kiraan (A1: A7)" Sub Akhir 

Jalankan kod VBA ini menggunakan kekunci F5 atau secara manual, ini akan menerapkan formula ke sel C2.

Contoh Kiraan VBA # 2

Sekarang, lihat satu lagi contoh dengan fungsi COUNT. Untuk contoh ini lihat data di bawah.

Kami mempunyai beberapa nilai berangka & bukan berangka dari A1 hingga A11. Sekarang saya akan menggunakan kod di bawah untuk mengira nilai berangka dari julat A1 hingga A11.

Kod:

 Sub Count_Contoh2 () Julat ("C2"). Nilai = "= Kiraan (A1: A11)" Sub Akhir 

Apabila kita melaksanakan kod di atas secara manual atau menggunakan kunci F5, kita mendapat hasilnya sebagai 5.

Namun, apabila kita melihat data dari A1 hingga A11, kita mempunyai nilai berangka dalam sel A1, A2, A3, A4, A5, A7, dan A11. Jadi secara keseluruhan, kita mempunyai nilai berangka dalam 7 sel tetapi formula telah mengembalikan hasilnya hanya 5.

Sebabnya adalah apabila kita melihat dengan teliti setiap sel di sel A5 dan A7 nilainya disimpan sebagai teks, bukan sebagai nombor. Oleh itu, fungsi COUNT telah mengembalikan hasilnya hanya 5 kerana ia memperlakukan sel-sel yang diformat atau disimpan sebagai teks sebagai nilai bukan angka dan mengabaikan dari jumlah berangka.

Seperti ini, kita dapat menggunakan fungsi COUNT di excel sebagai bagian dari kedua lembaran kerja dan fungsi VBA untuk menghitung nilai berangka dari daftar.