วิธีการตรวจสอบว่าเซลล์หรือช่วงของเซลล์หลายเซลล์ว่างด้วย Excel VBA หรือไม่

วันนี้ เราจะมาเรียนรู้เกี่ยวกับวิธีการตรวจสอบอย่างง่ายดายว่าเซลล์หนึ่งหรือหลายเซลล์ว่างหรือไม่โดยใช้ Visual Basic for Applications เนื้อหาเกี่ยวข้องกับ Excel 2019 / 365, 2016 และ Microsoft Office เวอร์ชันก่อนหน้า

เตรียมงาน

ก่อนเริ่มเขียนโค้ดด้วย VBA ใน Excel คุณจะต้องแน่ใจว่าแท็บการพัฒนาของคุณเปิดใช้งานอยู่ หากไม่เป็นเช่นนั้น โปรดดูบทแนะนำสั้นๆนี้

ตรวจสอบว่าช่วงเซลล์ Excel ว่างเปล่าด้วยVBA

• ใน Excel เปิดสภาพแวดล้อม Visual Basic ของคุณโดยกด Alt+F11
• แทรกโค้ดต่อไปนี้เป็นขั้นตอนในเวิร์กชีตของคุณ หรือในโมดูล VBA เฉพาะ

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

• ไปที่สเปรดชีตของคุณแล้วเลือกช่วงของเซลล์ที่ต้องการ
• กลับไปที่ตัวแก้ไข Visual Basic และตรวจสอบให้แน่ใจว่ามองเห็น Immediate viewer (CTRL+G) ได้ เนื่องจากวิธีการ Debug.Print ในโค้ดจะส่งออกผลลัพธ์ไปยังหน้าต่างนั้น
• กด F5 เพื่อเรียกใช้รหัสของคุณ
• ดูผลลัพธ์ในหน้าต่างทันที

• เซลล์ว่างทั้งหมดจะถูกระบุ

ส่วนขยายที่เป็นไปได้ของโค้ด: คุณสามารถขยายโค้ดนี้ได้ตามต้องการ ในกรณีที่คุณสนใจที่จะข้ามค่าว่างหรือไม่ต้องดำเนินการใดๆ ในกรณีที่เซลล์ไม่เต็ม ในทำนองเดียวกัน คุณสามารถตรวจสอบว่าช่วงนั้นว่างหรือไม่ กล่าวคือ ไม่มีเซลล์สีดำอยู่

กำลังตรวจสอบฟิลด์ที่ไม่ว่างเปล่า

ในลักษณะเดียวกัน คุณสามารถใช้คุณสมบัติ IsEmpty เพื่อตรวจสอบช่องที่ไม่เว้นว่างได้

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