Vba: cara menggunakan isnumeric untuk memeriksa apakah sel adalah angka

Anda dapat menggunakan fungsi IsNumeric di VBA untuk memeriksa apakah sel tertentu adalah angka.

Fungsi ini akan mengembalikan True jika nilai sel tertentu dikenali sebagai angka.

Jika tidak, fungsi tersebut akan mengembalikan False .

Berikut cara umum untuk menggunakan fungsi ini dalam praktik:

 SubCheckNumeric ()
    
    Dim i As Integer

    For i = 1 To 9
    
        If IsNumeric(Range(" A " & i)) = True Then
            Range(" B " & i) = " Numeric Value "
        Else
            Range(" B " & i) = " Not a Numeric Value "
        End If
    Next i
    
End Sub

Makro khusus ini akan memeriksa apakah setiap sel dalam rentang A1:A9 adalah angka.

Jika sel berupa angka, maka “Nilai Numerik” akan dikembalikan pada sel terkait dalam rentang B1:B9 .

Jika sel bukan angka, maka “Bukan nilai numerik” akan dikembalikan.

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Cara menggunakan IsNumeric di VBA

Misalkan kita memiliki kolom nilai berikut di Excel:

Misalkan kita ingin memeriksa apakah setiap sel di kolom A adalah angka.

Kita dapat membuat makro berikut untuk melakukan ini:

 SubCheckNumeric ()
    
    Dim i As Integer

    For i = 1 To 9
    
        If IsNumeric(Range(" A " & i)) = True Then
            Range(" B " & i) = " Numeric Value "
        Else
            Range(" B " & i) = " Not a Numeric Value "
        End If
    Next i
    
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Kolom B menampilkan hasil yang memberi tahu kita apakah setiap sel yang cocok di kolom A dikenali sebagai angka atau tidak.

Berikut beberapa hal menarik yang perlu diperhatikan dalam hasilnya:

• Angka dengan tempat desimal dikenali sebagai angka.
• Persentase diakui sebagai angka.
• Tanggal tidak dikenali sebagai angka.
• Teks yang berisi angka tidak dikenali sebagai angka.

Catatan : Anda dapat menemukan dokumentasi lengkap untuk fungsi VBA IsNumeric di sini .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

Bagaimana mengkonversi string ke int di VBA
Bagaimana mengkonversi string menjadi double di VBA
Bagaimana cara memeriksa apakah suatu string berisi string lain di VBA