Vba: cara menggunakan isdate untuk memeriksa apakah sel adalah tanggal
Anda dapat menggunakan fungsi IsDate di VBA untuk memeriksa apakah sel tertentu adalah tanggal.
Fungsi ini akan mengembalikan True jika nilai dalam sel tertentu dikenali sebagai tanggal.
Jika tidak, fungsi tersebut akan mengembalikan False .
Berikut cara umum untuk menggunakan fungsi ini dalam praktik:
SubCheckDate ()
Dim i As Integer
For i = 1 To 9
If IsDate(Range(" A " & i)) = True Then
Range(" B " & i) = " Is a Date "
Else
Range(" B " & i) = " Is Not a Date "
End If
Next i
End Sub
Makro khusus ini akan memeriksa apakah setiap sel dalam rentang A1:A9 adalah tanggal.
Jika sel adalah tanggal, maka “Apakah tanggal” akan dikembalikan pada sel yang sesuai dalam rentang B1:B9 .
Jika sel bukan tanggal, maka “Bukan tanggal” akan dikembalikan.
Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.
Contoh: Cara menggunakan IsDate di VBA
Misalkan kita memiliki kolom nilai berikut di Excel:
Misalkan kita ingin memeriksa apakah setiap sel di kolom A adalah tanggal.
Kita dapat membuat makro berikut untuk melakukan ini:
SubCheckDate ()
Dim i As Integer
For i = 1 To 9
If IsDate(Range(" A " & i)) = True Then
Range(" B " & i) = " Is a Date "
Else
Range(" B " & i) = " Is Not a Date "
End If
Next i
End Sub
Saat kami menjalankan makro ini, kami menerima keluaran berikut:
Kolom B memberi tahu kita apakah setiap sel yang cocok di kolom A dikenali sebagai tanggal atau tidak.
Perhatikan bahwa kami memilih untuk mengembalikan “Apakah tanggal” atau “Bukan tanggal”, tetapi Anda dapat mengembalikan apa pun yang Anda inginkan menggunakan pernyataan If Else .
Catatan : Anda dapat menemukan dokumentasi lengkap untuk fungsi VBA IsDate di sini .
Sumber daya tambahan
Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:
VBA: Cara mendapatkan nama bulan dari tanggal
VBA: cara menggunakan fungsi DateValue
VBA: Angka lebih besar dari tanggal