Cara Menggunakan Fungsi VBA IsNumeric (9 Contoh)

Hugh West

04-06-2023 Makro &; Excel VBA
  • Bagikan Ini
Hugh West

Jika Anda mencari beberapa cara termudah untuk menggunakan VBA IsNumeric maka Anda berada di tempat yang tepat. Kita umumnya menggunakan fungsi ini di VBA untuk menguji apakah suatu ekspresi adalah angka atau bukan dan tergantung pada ekspresi yang akan dikembalikan BENAR jika ekspresinya adalah angka, jika tidak SALAH .

Unduh Buku Kerja

VBA IsNumeric Function.xlsm

VBA IsNumeric Fungsi: Sintaks &; Argumen

⦿ Sintaksis

IsNumeric (Ekspresi)

⦿ Argumen

Argumen Wajib / Pilihan Penjelasan
Ekspresi Diperlukan Ini adalah varian yang akan diperiksa apakah itu angka atau bukan.

⦿ Nilai Pengembalian

Masukan Nilai Pengembalian
Nomor BENAR
Bukan Angka; String SALAH

⦿ Versi

The Fungsi ISNUMERIC diperkenalkan di Excel 2000 dan tersedia untuk semua versi setelah itu.

9 Contoh Penggunaan Fungsi IsNumeric VBA

Dalam artikel ini, kami akan mencoba mendemonstrasikan penggunaan VBA IsNumeric dengan beberapa contoh acak bersama dengan beberapa contoh termasuk tabel berikut.

Kami telah menggunakan Microsoft Excel 365 di sini, Anda dapat menggunakan versi lain sesuai dengan kenyamanan Anda.

1. Memeriksa VBA IsNumeric dengan Beberapa Nilai Acak

Di sini, kita akan menguji beberapa string acak dengan VBA ISNUMERIC , jika nilainya numerik atau bukan.

Langkah-01 :

➤ Pergi ke Pengembang Tab>> Visual Basic Opsi.

Kemudian, itu Editor Visual Basic akan terbuka.

➤ Pergi ke Sisipkan Tab>> Modul Opsi.

Setelah itu, a Modul akan dibuat.

Langkah-02 :

Tulis kode berikut ini 

 Sub checkvalue1() Dim x As Variant x = InputBox("Berikan Nilai") MsgBox IsNumeric(x) End Sub

Di sini, kita telah menyatakan x sebagai Varian dan akan menyimpan nilai input. ISNUMERIC akan kembali BENAR jika nilai input berupa numerik, jika tidak maka akan mengembalikan SALAH Kita akan menemukan output di dalam kotak pesan ( MsgBox ).

➤ Tekan F5 .

Kemudian Anda akan mendapatkan kotak input berikut dan jika Anda menulis nilainya 100 dan tekan OK ,

Anda akan mendapatkan kotak pesan yang mengatakan "Benar" .

Untuk menulis string Kucing dan menekan OK dalam kotak input,

Kami mendapatkan kotak pesan yang mengatakan "Salah" .

Baca Lebih Lanjut: Cara Menggunakan Fungsi Acak VBA di Excel (5 Contoh)

2. Menggunakan VBA IsNumeric dengan Pernyataan IF-THEN-ELSE

Dalam bagian ini, kita akan menggunakan Fungsi ISNUMERIC dengan IF-THEN-ELSE pernyataan dalam sebuah VBA kode untuk menentukan nilai numerik dan non-numerik.

Langkah-langkah :

➤ Ikuti Langkah-01 dari Bagian 1 .

Tuliskan kode berikut ini 

 Sub checkvalue2() Dim x As Variant x = InputBox("Berikan Nilai") If IsNumeric(x) = True Then MsgBox "Nilai yang Diberikan adalah numerik" Else MsgBox "Nilai yang Diberikan bukan numerik" End If End Sub

Di sini, kita telah menyatakan x sebagai Varian dan akan menyimpan nilai input. Ketika ISNUMERIC akan kembali BENAR , JIKA akan mengembalikan pesan yang mengatakan "Nilai yang diberikan adalah numerik" dan jika ISNUMERIC kembali SALAH , maka JIKA mengembalikan pesan yang menjelaskan "Nilai yang diberikan bukan numerik" .

➤ Tekan F5 .

Kemudian Anda akan mendapatkan kotak input berikut dan jika Anda menulis nilainya 200 dan tekan OK ,

Anda akan mendapatkan kotak pesan yang mengatakan "Nilai yang diberikan adalah numerik" .

Untuk menulis string Kucing dan menekan OK dalam kotak input,

Kami mendapatkan kotak pesan yang mengatakan "Nilai yang diberikan bukan numerik" .

Baca selengkapnya: Pernyataan VBA If - Then - Else di Excel (4 Contoh)

3. Menciptakan Hasil Berlawanan dengan Fungsi IsNumeric

Di sini, kita akan membuat VBA yang akan memberi kita hasil kebalikan dari kode Fungsi ISNUMERIC yang berarti untuk nilai numerik kita akan mendapatkan SALAH dan untuk nilai non-numerik, ia akan mengembalikan BENAR .

Langkah-langkah :

➤ Ikuti Langkah-01 dari Bagian 1 .

Tuliskan kode berikut ini 

 Sub checkvalue3() Dim x As Variant x = InputBox("Berikan Nilai") If IsNumeric(x) = True Then MsgBox ("FALSE") Else MsgBox ("TRUE") End If End Sub

Di sini, kita telah menyatakan x sebagai Varian dan akan menyimpan nilai input. Ketika ISNUMERIC akan kembali BENAR , JIKA akan mengembalikan pesan yang mengatakan "SALAH" dan jika ISNUMERIC kembali SALAH , maka JIKA mengembalikan pesan yang menjelaskan "BENAR" .

➤ Tekan F5 .

Kemudian Anda akan mendapatkan kotak input berikut dan jika Anda menulis nilainya 25 dan tekan OK ,

Anda akan mendapatkan kotak pesan yang mengatakan "SALAH" .

Untuk menulis string Alaska dan menekan OK dalam kotak input,

Kami mendapatkan kotak pesan yang mengatakan "BENAR" .

Konten Terkait: Fungsi Format VBA di Excel (8 Penggunaan dengan Contoh)

4. Memeriksa Apakah Kosong itu Numerik atau Bukan

Anda bisa memeriksa dengan mudah dengan VBA kode jika kosong adalah numerik atau tidak.

Langkah-langkah :

➤ Ikuti Langkah-01 dari Bagian 1 .

Tuliskan kode berikut ini 

 Sub checkvalue4() Dim x As Variant x = " " MsgBox IsNumeric(x) End Sub

Di sini, kita telah menyatakan x sebagai Varian dan akan menyimpan Kosong Kemudian ISNUMERIC akan kembali BENAR jika Kosong adalah numerik jika tidak maka akan mengembalikan SALAH .

➤ Tekan F5 .

Setelah itu, Anda akan mendapatkan kotak pesan yang mengatakan "Salah" yang berarti kosong bukan numerik .

Baca selengkapnya: Rumus Excel untuk Menghasilkan Angka Acak (5 contoh)

5. Memeriksa Apakah Tanggal bersifat numerik atau tidak

Pada bagian ini, kita akan menggunakan tanggal acak dan memeriksa apakah tanggal tersebut numerik atau bukan.

Langkah-langkah :

➤ Ikuti Langkah-01 dari Bagian 1 .

Tuliskan kode berikut ini 

 Sub checkvalue5() Dim x As Variant x = "02/02/2022 " MsgBox IsNumeric(x) End Sub

Di sini, kita telah menyatakan x sebagai Varian dan akan menyimpan tanggal. ISNUMERIC akan kembali BENAR jika tanggalnya numerik, jika tidak maka akan kembali SALAH .

➤ Tekan F5 .

Setelah itu, Anda akan mendapatkan kotak pesan yang mengatakan "Salah" yang berarti tanggal bukan numerik .

Kita juga bisa mencoba dengan Fungsi DATESERIAL untuk membuat tanggal dan memeriksa apakah itu numerik atau tidak.

➤ Ketik kode berikut 

 Sub checkvalue5a() Dim x As Variant x = DateSerial(2022, 2, 2) MsgBox IsNumeric(x) End Sub

Di sini, kita telah menyatakan x sebagai Varian dan akan menyimpan tanggal yang dibuat oleh Fungsi DATESERIAL Kemudian ISNUMERIC akan kembali BENAR jika tanggalnya numerik, jika tidak maka akan kembali SALAH .

➤ Tekan F5 .

Sebagai gantinya, Anda akan mendapatkan kotak pesan yang mengatakan "Salah" juga kali ini.

Baca selengkapnya: Fungsi Tanggal VBA (12 Penggunaan Makro dengan Contoh)

Bacaan serupa:

  • Cara Menggunakan Fungsi MsgBox di Excel VBA (Panduan Lengkap)
  • Gunakan Fungsi VBA Environ (4 Contoh)
  • Cara Menggunakan VBA Dan Fungsi di Excel (4 Contoh)
  • Gunakan Pernyataan Kasus VBA (13 Contoh)
  • Cara Menggunakan Fungsi Log di Excel VBA (5 Contoh yang Sesuai)

6. Memeriksa Apakah Waktu itu Numerik atau Bukan

Pada bagian ini, kita akan memeriksa apakah waktu adalah numerik atau bukan dengan menggunakan Fungsi ISNUMERIC .

Langkah-langkah :

➤ Ikuti Langkah-01 dari Bagian 1 .

Tuliskan kode berikut ini 

 Sub checkvalue6() Dim x As Variant x = "09:30:00 AM" MsgBox IsNumeric(x) End Sub

Di sini, kita telah menyatakan x sebagai Varian dan itu akan menyimpan waktu. ISNUMERIC akan kembali BENAR jika waktunya numerik jika tidak maka akan kembali SALAH .

➤ Tekan F5 .

Setelah itu, Anda akan mendapatkan kotak pesan yang mengatakan "Salah" yang berarti waktu bukan numerik .

Anda juga bisa mencoba dengan Fungsi TIMESERIAL untuk membuat tanggal dan memeriksa apakah itu numerik atau tidak.

➤ Ketik kode berikut 

 Sub checkvalue6a() Dim x As Variant x = TimeSerial(9, 30, 0) MsgBox IsNumeric(x) End Sub

Di sini, kita telah menyatakan x sebagai Varian dan akan menyimpan waktu yang dibuat oleh Fungsi TIMESERIAL Kemudian ISNUMERIC akan kembali BENAR jika waktunya numerik jika tidak maka akan kembali SALAH .

➤ Tekan F5 .

Kemudian, Anda akan mendapatkan kotak pesan yang mengatakan "Salah" juga kali ini.

Sekali lagi, kita bisa mencoba mereferensikan ke nilai waktu dalam sel sheet.

➤ Ketik kode berikut 

 Sub checkvalue6b() Dim x As Variant x = range("B2").value MsgBox IsNumeric(x) End Sub

Di sini, kita telah menyatakan x sebagai Varian dan akan menyimpan waktu yang ada di dalam B2 sel. Kemudian ISNUMERIC akan kembali BENAR jika waktunya numerik jika tidak maka akan kembali SALAH .

➤ Tekan F5 .

Akhirnya, Anda akan mendapatkan kotak pesan yang mengatakan "Benar" kali ini.

Baca selengkapnya: Cara Menggunakan VBA TimeSerial di Excel (3 Contoh)

7. Menggunakan VBA IsNumeric untuk Rentang Nilai

Di sini, kita akan memeriksa apakah nilai-nilai dari Tanda/Kelas kolom numerik atau non-numerik dan memiliki hasil dalam kolom Periksa kolom.

Langkah-langkah :

➤ Ikuti Langkah-01 dari Bagian 1 .

Tuliskan kode berikut ini 

 Sub checkvalue7() Dim cell As Range For Each cell In Range("D5:D11") cell.Offset(0, 1) = IsNumeric(cell) Next cell End Sub

Kita telah mendeklarasikan sel sebagai Range dan menggunakan a UNTUK perulangan untuk sel-sel dari rentang "D5:D11" dan untuk sel-sel ini, sel ISNUMERIC akan kembali BENAR jika nilainya numerik, jika tidak maka akan mengembalikan SALAH dan sel.Offset(0, 1) akan mengembalikan nilai output dalam satu kolom kemudian ke kolom input.

➤ Tekan F5 .

Setelah itu, kita akan memiliki BENAR untuk nilai numerik atau Tanda dan SALAH untuk nilai non-numerik atau Nilai .

Baca selengkapnya: Cara Menggunakan Fungsi VBA Val di Excel (7 Contoh)

8. Membuat Fungsi untuk Menguji Rentang Nilai

Dalam bagian ini, kita akan membuat fungsi dengan VBA ISNUMERIC dan memeriksa apakah nilai-nilai dari Tanda/Kelas kolom adalah numerik atau non-numerik.

Langkah-01 :

➤ Ikuti Langkah-01 dari Bagian 1 .

Tuliskan dan simpan kode berikut 

 Fungsi IsNumericTest (nilai Sebagai Varian) Sebagai Boolean Jika IsNumeric (nilai) Maka IsNumericTest = True Else IsNumericTest = False End If End If End Function

Kode ini akan menciptakan fungsi bernama IsNumericTest .

Langkah-02 :

Kembali ke lembar utama dan ketik rumus berikut di dalam sel E5

=IsNumericTest(D5)

D5 adalah Tanda/Kelas dari seorang siswa dan IsNumericTest akan kembali BENAR/SALAH tergantung pada nilainya.

➤ Tekan MASUK dan seret ke bawah Isi Gagang alat.

Akhirnya, kita akan memiliki BENAR untuk nilai numerik atau Tanda dan SALAH untuk nilai non-numerik atau Nilai .

Konten Terkait: Cara Menggunakan Fungsi VBA DIR di Excel (7 Contoh)

9. Menghitung Nilai Non-Numerik Dengan Fungsi VBA IsNumeric

Kita ingin menghitung nilai atau nilai non-numerik dari Tanda/Kelas dan untuk melakukan hal ini di sini kita akan menggunakan VBA ISNUMERIC dan memiliki jumlah total nilai non-numerik yang kita miliki di dalam Hitung kolom.

Langkah-01 :

➤ Ikuti Langkah-01 dari Bagian 1 .

Tuliskan dan simpan kode berikut 

 Fungsi countnonnumeric (nilai Sebagai rentang) Sebagai Panjang Dim sel Sebagai rentang Dim count Sebagai Panjang Untuk Setiap sel Dalam value.Cells Jika Tidak IsNumeric (cell.value) Maka hitung = hitung + 1 End If Next countnonnumeric = hitung End Function

Kode ini akan menciptakan fungsi bernama countnonnumeric .

Ketika nilai sel tidak akan menjadi nilai numerik, maka hitung akan ditingkatkan oleh 1 .

Langkah-02 :

Kembali ke lembar utama dan ketik rumus berikut ini

=countnonnumeric(D5:D11)

D5:D11 adalah kisaran dari Tanda/Kelas dari para siswa dan countnonnumeric akan mengembalikan jumlah total nilai non-numerik.

➤ Tekan MASUK

Akhirnya, Anda akan mendapatkan nilai 3 yang berarti Anda memiliki 3 Nilai di dalam Tanda/Kelas kolom.

Baca selengkapnya: Cara Mengembalikan Nilai dalam Fungsi VBA (Baik Nilai Array dan Non-Array)

IsNumeric vs ISNUMBER

  • ISNUMERIC memeriksa apakah suatu nilai dapat dikonversi menjadi angka dan ISNUMBER memeriksa apakah suatu nilai disimpan sebagai angka.
  • Ada beberapa perbedaan antara Fungsi VBA ISNUMERIC dan Excel Fungsi ISNUMBER dan kami telah mencoba untuk menunjukkan perbedaan di bawah ini dengan menggunakan Fungsi IsNumericTest dan Excel bawaan Fungsi ISNUMBER .

Bagian Latihan

Untuk melakukan latihan sendiri, kami telah menyediakan Praktek seperti di bawah ini dalam lembar bernama Praktek . Silakan lakukan sendiri.

Kesimpulan

Dalam artikel ini, kami mencoba membahas beberapa cara untuk menggunakan VBA ISNUMERIC Semoga bermanfaat bagi Anda. Jika Anda memiliki saran atau pertanyaan, jangan ragu untuk membagikannya di bagian komentar.

Postingan sebelumnya Cara Mengganti Teks dalam Rumus Excel (7 Cara Mudah)
Postingan berikutnya Cara Menghitung Kesalahan Standar Proporsi di Excel (dengan Langkah Mudah)

Hugh West adalah pelatih dan analis Excel yang sangat berpengalaman dengan pengalaman lebih dari 10 tahun di industri ini. Beliau meraih gelar Sarjana di bidang Akuntansi dan Keuangan dan gelar Master di bidang Administrasi Bisnis. Hugh memiliki hasrat untuk mengajar dan telah mengembangkan pendekatan pengajaran unik yang mudah diikuti dan dipahami. Pengetahuan ahlinya tentang Excel telah membantu ribuan siswa dan profesional di seluruh dunia meningkatkan keterampilan dan unggul dalam karier mereka. Melalui blognya, Hugh membagikan pengetahuannya kepada dunia, menawarkan tutorial Excel gratis dan pelatihan online untuk membantu individu dan bisnis mencapai potensi penuh mereka.