ล้างเซลล์ Excel ด้วยปุ่มคลิกเดียว: 4 ขั้นตอนง่ายๆ

นี่คือชุดข้อมูลตัวอย่าง

ขั้นตอนที่ 1 – สร้างโมดูล VBA เพื่อล้างเซลล์ใน Excel

• ไปที่แท็บ Developer และคลิก Visual Basic

คุณสามารถกด ALT + F11 เพื่อเปิดหน้าต่าง “Microsoft Visual Basic for Applications” ได้เช่นกัน

• ใน “Insert” เลือก “Module”

ขั้นตอนที่ 2 – ใส่โค้ด VBA ในโมดูล

• ในหน้าต่าง “Module” ใส่โค้ด VBA นี้

โค้ดสำหรับล้างเซลล์โดยเก็บรูปแบบไว้:

Sub Clear_Cell_With_Button() Dim rng As Range Set rng = Application.InputBox(Prompt:="Select the Range of Cell", Title:="Exceldemy", Type:=8) rng.Select Selection.ClearContents End Sub 

โค้ดสำหรับล้างเซลล์รวมถึงรูปแบบ

Sub Clear_Cell_With_Button_including_Format() Dim rng As Range Set rng = Application.InputBox(Prompt:="Select the Range of Cell", Title:="Exceldemy", Type:=8) rng.Select Selection.Clear End Sub

โค้ดสำหรับลบเซลล์

Sub Delete_Cell_With_Button() Dim rng As Range Set rng = Application.InputBox(Prompt:="Select the Range of Cell", Title:="Exceldemy", Type:=8) rng.Select Selection.Delete End Sub

อ่านเพิ่มเติม: Excel VBA to Clear Contents of Range

ความแตกต่างระหว่างคำสั่ง Clear, Delete, และ ClearContents ใน Excel VBA

คำสั่ง ClearContents ล้างค่าเซลล์อย่างเดียว โดยเก็บรูปแบบเซลล์ไว้ คำสั่ง Clear ลบค่าเซลล์และรูปแบบเซลล์ ทำให้เซลล์ว่างเปล่า คำสั่ง Delete ลบเซลล์และเลื่อนเซลล์ด้านล่างขึ้นมา

ขั้นตอนที่ 3 – สร้างปุ่มเพื่อล้างเซลล์ใน Excel

• ไปที่แท็บ Developer
• คลิก Insert และเลือก Button

• วาด กล่อง ในพื้นที่ที่ต้องการวางปุ่ม

• หน้าต่าง “Assign macro” จะเปิด
• เลือก macro ที่คุณสร้าง
• คลิก OK

• คุณจะเห็นปุ่มแมโครในพื้นที่ที่เลือก คลิกขวา ปุ่มแมโครเพื่อ เปลี่ยนชื่อ เป็น “Clear Contents Only”

• สร้างปุ่มอีกสองปุ่มสำหรับโค้ดอื่นๆ ชื่อ “Clear Cells Including Format” และ “Delete Cells”

ขั้นตอนที่ 4 – รันแมโคร VBA เพื่อล้างเซลล์ด้วยปุ่ม

• คลิก “Clear Contents Only” เพื่อล้างค่าเซลล์ที่เลือกอย่างเดียว

• หน้าต่างจะเปิด เลือก ช่วงและ คลิก OK

• ค่าเซลล์ที่เลือกถูกล้าง แต่ รูปแบบ เหมือนเดิม

• คลิก “Clear Cells Including Format” เพื่อล้างค่าเซลล์และลบการจัดรูปแบบ
• เลือก ช่วงเซลล์ที่ต้องการล้างและคลิก OK

เซลล์ที่เลือกถูกล้างแล้ว

• คลิก “Delete Cells” และเลือกช่วงเซลล์

เซลล์ที่เลือกถูกลบ และเซลล์ด้านล่างเลื่อนขึ้นมา

อ่านเพิ่มเติม: วิธีล้างเนื้อหาแผ่นงานด้วย Excel VBA

ดาวน์โหลดไฟล์ฝึกฝน

ดาวน์โหลดไฟล์ฝึกฝนที่นี่:

บทความที่เกี่ยวข้อง

• วิธีล้างเนื้อหาโดยไม่ลบสูตรด้วย VBA ใน Excel
• Excel VBA to Clear Contents of Named Range
• Excel VBA to Delete and Shift Left Any Cell or Column
• Excel VBA: Clear Contents If Cell Contains Specific Values

รับแบบฝึกหัด Excel ขั้นสูงพร้อมเฉลยฟรี!