Bagaimana untuk menyemak sama ada sel atau julat berbilang sel kosong dengan Excel VBA?

Hari ini kita akan belajar tentang cara menyemak dengan mudah sama ada satu atau berbilang sel kosong menggunakan Visual Basic for Applications. Kandungan adalah berkaitan untuk Excel 2019 / 365, 2016 dan versi Microsoft Office yang lebih awal.

Kerja persediaan

Sebelum memulakan pengekodan dengan VBA dalam Excel, anda perlu memastikan bahawa tab pembangunan anda didayakan. Jika itu tidak berlaku, sila lihat tutorial ringkas ini .

Menyemak sama ada julat sel Excel kosong dengan VBA

  • Dalam Excel, buka persekitaran Visual Basic anda dengan menekan Alt+F11
  • Masukkan kod berikut sebagai prosedur dalam Lembaran Kerja anda, atau secara alternatif dalam modul VBA khusus.
Sub Check_Cell_is_empty_alt()

Dim rng As Range
Set rng = Selection

For Each Cell In rng

    If IsEmpty(Cell.Value) = True Then
        
    Debug.Print ("Empty")
    Else
        Debug.Print ("Not Empty")
    End If
Next Cell


End Sub


  • Pergi ke hamparan anda dan pilih julat sel yang sewenang-wenangnya.
  • Kembali ke editor Visual Basic dan pastikan pemapar Segera (CTRL+G) kelihatan – kerana kaedah Debug.Print dalam kod akan mengeluarkan hasilnya ke tetingkap itu.
  • Tekan F5 untuk menjalankan kod anda.
  • Lihat ke dalam keputusan dalam tetingkap segera.

Bagaimana untuk menyemak sama ada sel atau julat berbilang sel kosong dengan Excel VBA?

  • Semua sel kosong akan dikenal pasti.

Kemungkinan sambungan kepada kod: Anda boleh memanjangkan kod ini mengikut keperluan sekiranya anda berminat untuk melangkau nilai kosong atau tidak melakukan apa-apa sekiranya sel tidak penuh. Begitu juga, anda boleh menyemak sama ada Julat itu sendiri kosong, iaitu – tiada sel hitam terkandung.

Menyemak medan bukan kosong

Dengan cara yang sama, anda boleh menggunakan harta IsEmpty untuk menyemak medan yang tidak kosong.

 If Not IsEmpty(Cell.Value) = True Then
        Debug.Print ("Not Empty")
    Else
        Debug.Print ("Empty")
    End If

Bonus: Gunakan kod berikut jika anda ingin menyerlahkan sel kosong juga.

Malapkan i Selagi Malap c Sepanjang Malap myJulat Sebagai Julat Malapkan mySel Sebagai Julat Tetapkan myJulat = Julat("A1:A10") Untuk Setiap myCell Dalam myJulat ' c = c + 1 If IsEmpty(myCell) Then myCell.Interior.Color = RGB(255, 87, 87) i = i + 1 End If Next myCell MsgBox _ "Terdapat jumlah " & i & " sel kosong daripada " & c & "."

Tinggalkan Komen

Templat PowerPoint Pembentangan Senarai Hartanah Moden Percuma: Pelan Praktikal Pitch Penjual

Templat PowerPoint Pembentangan Senarai Hartanah Moden Percuma: Pelan Praktikal Pitch Penjual

Bina pembentangan senarai hartanah moden dalam PowerPoint dengan pelan slaid percuma, tip templat disahkan, amaran CMA, semakan hak foto, dan perlindungan Perumahan Adil.

HubSpot Free CRM vs. Zoho CRM: Pilihan Terbaik untuk Ejen Hartanah Solo pada 2026

HubSpot Free CRM vs. Zoho CRM: Pilihan Terbaik untuk Ejen Hartanah Solo pada 2026

Bandingkan HubSpot Free CRM dan Zoho CRM untuk ejen hartanah solo, termasuk kenalan, saluran jualan, automasi, penyesuaian, penjadualan, had, dan pencetus naik taraf.

Cara Membaiki Audio Rakaman Skrin PowerPoint yang Tidak Berfungsi pada Windows

Cara Membaiki Audio Rakaman Skrin PowerPoint yang Tidak Berfungsi pada Windows

Baiki rakaman skrin PowerPoint yang senyap dengan memeriksa kawalan Audio, kebenaran mikrofon Windows, peranti input aktif, jangkaan audio sistem, dan kemas kini Office.

Templat PDF Penjadualan Masa Harian Boleh Cetak untuk Profesional WFH: Panduan Pemula

Templat PDF Penjadualan Masa Harian Boleh Cetak untuk Profesional WFH: Panduan Pemula

Gunakan templat PDF penjadualan masa harian boleh cetak untuk merancang jam kerja fokus WFH, mesyuarat, rehat, tugas pentadbiran, dan penimbal yang realistik tanpa memuatkan hari anda secara berlebihan.

Templat Pembentangan Laporan Status Projek Percuma untuk Pasukan Agile

Templat Pembentangan Laporan Status Projek Percuma untuk Pasukan Agile

Bina pembentangan laporan status projek Agile yang ringkas dengan matlamat sprint, hasil, risiko, isyarat kualiti, keputusan, dan langkah seterusnya—tanpa menjadikan slaid sebagai timbunan backlog.

Templat Penjejak Perbelanjaan Kontraktor Bebas untuk Freelancer AS: Rujukan Praktikal 2026

Templat Penjejak Perbelanjaan Kontraktor Bebas untuk Freelancer AS: Rujukan Praktikal 2026

Jejak perbelanjaan perniagaan freelance, resit, jarak perjalanan, dan kategori Jadual C dengan rujukan penjejak perbelanjaan praktikal 2026 untuk kontraktor AS.

Muat Turun Percuma Templat PowerPoint Laporan Tahunan Bukan Untung: Panduan Slaid Praktikal

Muat Turun Percuma Templat PowerPoint Laporan Tahunan Bukan Untung: Panduan Slaid Praktikal

Cari titik permulaan percuma untuk PowerPoint laporan tahunan bukan untung, serta struktur slaid praktikal, senarai semak kewangan, metrik impak, tip aksesibiliti, dan panduan penyesuaian.

Templat Penganjur Kalendar Bil Bulanan Percuma untuk Excel: Cara Mudah Menjejak Tarikh Akhir Pembayaran

Templat Penganjur Kalendar Bil Bulanan Percuma untuk Excel: Cara Mudah Menjejak Tarikh Akhir Pembayaran

Susun bil berulang dalam Excel dengan kalendar bulanan, senarai bil, penjejakan status, jumlah SUMIFS, dan penyorotan tarikh akhir. Termasuk contoh ilustrasi praktikal.

Templat Excel Percuma untuk Penjejak Perbelanjaan & Pendapatan Hartanah Sewa: Persediaan Mesra Pemula

Templat Excel Percuma untuk Penjejak Perbelanjaan & Pendapatan Hartanah Sewa: Persediaan Mesra Pemula

Bina penjejak pendapatan dan perbelanjaan hartanah sewa percuma dalam Excel dengan rekod peringkat hartanah, kategori mesra Jadual E, penjejakan aliran tunai, resit, dan kemas kini elaun perbatuan 2026.

Templat Invois Perniagaan Kecil Percuma untuk Excel dengan Pengiraan Cukai Jualan Automatik

Templat Invois Perniagaan Kecil Percuma untuk Excel dengan Pengiraan Cukai Jualan Automatik

Bina invois Excel yang boleh digunakan semula yang mengira jumlah kecil, jualan bercukai, cukai jualan, dan jumlah keseluruhan secara automatik, dengan senarai semak praktikal untuk perniagaan kecil di AS.