Vba: cara memeriksa apakah sel kosong (dengan contoh)

Anda dapat menggunakan sintaks dasar berikut untuk memeriksa apakah sel kosong di VBA:

 SubCheckBlank ()
    Dim i As Integer

    For i = 2 To 13
        If IsEmpty(Range(" A " & i)) Then
        Result = “ Cell is Empty ”
        Else
        Result = “ Cell is Not Empty ”
        End If
    Range(" B " & i) = Result
    Next i
End Sub

Contoh khusus ini memeriksa apakah setiap sel dalam rentang A2:A13 kosong, lalu menetapkan “Sel kosong” atau “Sel tidak kosong” ke setiap sel yang cocok dalam rentang B2:B13 .

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Cara memeriksa apakah sel kosong menggunakan VBA

Misalkan kita memiliki daftar nama tim bola basket berikut di Excel:

Misalkan kita ingin memeriksa apakah setiap sel dalam rentang A2:A13 kosong, lalu menampilkan hasilnya di sel terkait dalam rentang B2:B8 .

Kita dapat membuat makro berikut untuk melakukan ini:

 SubCheckBlank ()
    Dim i As Integer

    For i = 2 To 13
        If IsEmpty(Range(" A " & i)) Then
        Result = “ Cell is Empty ”
        Else
        Result = “ Cell is Not Empty ”
        End If
    Range(" B " & i) = Result
    Next i
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Kolom B memberi tahu kita apakah masing-masing sel terkait di kolom A kosong atau tidak.

Anda juga bisa menggunakan makro berikut untuk sekadar mengembalikan nama tim itu sendiri di kolom B jika nilainya tidak kosong di kolom A:

 SubCheckBlank ()
    Dim i As Integer

    For i = 2 To 13
        If IsEmpty(Range(" A " & i)) Then
        Result = “ Cell is Empty ”
        Else
        Result = Range(" A " & i).Value
        End If
    Range(" B " & i) = Result
    Next i
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Kolom B sekarang mengembalikan nama tim di kolom A jika sel tidak kosong.

Catatan : Anda dapat menemukan dokumentasi lengkap untuk metode VBA IsEmpty di sini .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara menghitung kemunculan karakter dalam sebuah string
VBA: cara memeriksa apakah suatu string berisi string lain
VBA: rumus untuk “Jika” sel berisi”