Vba: วิธีเลือกเซลล์ทั้งหมดที่มีข้อมูล

คุณสามารถใช้วิธีการต่อไปนี้ใน VBA เพื่อเลือกเซลล์ทั้งหมดที่มีข้อมูลในแผ่นงาน:

วิธีที่ 1: เลือกตารางเซลล์ที่มีข้อมูล

 SubSelectCellsWithData ()

Range(" A1 ").CurrentRegion.Select

End Sub

มาโครนี้จะเลือกตารางของเซลล์ที่มีข้อมูลที่เริ่มต้นจากเซลล์ A1 ของแผ่นงานที่ใช้งานอยู่ในปัจจุบัน

วิธีที่ 2: เลือกแต่ละเซลล์ที่มีข้อมูล

 SubSelectCellsWithData ()

Worksheets(" Sheet1 ").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeConstants).Activate

End Sub

มาโครนี้จะเลือกเซลล์ทั้งหมดที่มีข้อมูลจาก Sheet1

ตัวอย่างต่อไปนี้แสดงวิธีการใช้แต่ละวิธีในทางปฏิบัติกับแผ่นงานต่อไปนี้ที่เรียกว่า Sheet1 ใน Excel:

ตัวอย่างที่ 1: เลือกตารางเซลล์ที่มีข้อมูล

สมมติว่าเราต้องการเลือกตารางเซลล์ที่มีข้อมูลใน Sheet1

เราสามารถสร้างมาโครต่อไปนี้เพื่อทำสิ่งนี้:

 SubSelectCellsWithData ()

Range(" A1 ").CurrentRegion.Select

End Sub

เมื่อเราเรียกใช้แมโครนี้ เราจะเห็นว่าได้เลือกตารางเซลล์ทั้งหมดที่มีข้อมูลใน Sheet1 แล้ว:

โปรดทราบว่าวิธีนี้ใช้คุณสมบัติ CurrentRegion เพื่อเลือกช่วงของเซลล์ที่ล้อมรอบด้วยเซลล์ว่าง

คุณสามารถดูเอกสารฉบับเต็มสำหรับคุณสมบัติ CurrentRegion ได้ที่นี่

ตัวอย่างที่ 2: เลือกแต่ละเซลล์ที่มีข้อมูล

สมมติว่าเราต้องการเลือกเฉพาะเซลล์ทั้งหมดที่มีข้อมูลใน Sheet1

เราสามารถสร้างมาโครต่อไปนี้เพื่อทำสิ่งนี้:

 SubSelectCellsWithData ()

Worksheets(" Sheet1 ").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeConstants).Activate

End Sub

เมื่อเราเรียกใช้แมโครนี้ เราจะเห็นว่าแต่ละเซลล์ใน Sheet1 ที่มีข้อมูลถูกเลือก:

แหล่งข้อมูลเพิ่มเติม

บทช่วยสอนต่อไปนี้จะอธิบายวิธีการทำงานทั่วไปอื่นๆ ใน VBA:

VBA: วิธีตั้งค่าของเซลล์ในแผ่นงานอื่น
VBA: วิธีเลือกช่วงในเซลล์ที่ใช้งานอยู่
VBA: วิธีลบแถวตามค่าของเซลล์