วิธีลบปุ่มหรือปุ่มคำสั่งทั้งหมดใน Excel
บทความนี้อธิบายวิธีการลบปุ่มควบคุมฟอร์มหรือปุ่มคำสั่งทั้งหมดออกจากแผ่นงานที่ใช้งานอยู่ใน Excel
ลบปุ่มทั้งหมดรวมถึงปุ่มควบคุมแบบฟอร์มและปุ่มคำสั่งโดยเลือกทั้งหมด
ลบปุ่มทั้งหมดรวมถึงปุ่มควบคุมฟอร์มและปุ่มคำสั่งด้วยรหัส VBA
ลบปุ่มควบคุมฟอร์มหรือปุ่มคำสั่งทั้งหมดด้วยรหัส VBA
ลบปุ่มทั้งหมดรวมถึงปุ่มควบคุมแบบฟอร์มและปุ่มคำสั่งโดยเลือกทั้งหมด
โปรดทำดังนี้เพื่อลบปุ่มทั้งหมด (รวมถึงปุ่มควบคุมฟอร์มและปุ่มคำสั่ง) ออกจากแผ่นงานที่ใช้งานอยู่
1. เปิดใช้งานโหมดออกแบบโดยคลิก ผู้พัฒนา > โหมดการออกแบบ. ดูภาพหน้าจอ:
2. เลือกปุ่มคำสั่งปุ่มใดปุ่มหนึ่งแล้วกดปุ่ม Ctrl + A ปุ่มเพื่อเลือกปุ่มทั้งหมดในแผ่นงานปัจจุบัน
3 กด ลบ ปุ่มเพื่อลบปุ่มที่เลือกทั้งหมด
หมายเหตุ: หากมีวัตถุอื่นในแผ่นงานนี้พวกเขาจะถูกเลือกด้วย
ลบปุ่มทั้งหมดรวมถึงปุ่มควบคุมฟอร์มและปุ่มคำสั่งด้วยรหัส VBA
นอกจากนี้คุณสามารถใช้สคริปต์ VBA ด้านล่างเพื่อลบปุ่มทั้งหมดออกจากแผ่นงานปัจจุบันใน Excel
1. เปิดแผ่นงานที่มีปุ่มที่คุณต้องการเอาออกจากนั้นกดปุ่ม อื่น ๆ + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูลจากนั้นคัดลอกโค้ด VBA ด้านล่างลงในหน้าต่าง Code
รหัส VBA: ลบปุ่มทั้งหมดออกจากแผ่นงานที่ใช้งานอยู่
Sub Clear_ButtonsActiveSheet()
Dim I As Long
Dim xOLE As Object
On Error Resume Next
ActiveSheet.Buttons.Delete
For Each xOLE In ActiveSheet.OLEObjects
If TypeName(xOLE.Object) = "CommandButton" Then
xOLE.Delete
End If
Next
End Sub
3 กด F5 ปุ่มสำหรับเรียกใช้โค้ด ปุ่มทั้งหมด รวมถึงปุ่มควบคุมฟอร์มและปุ่มคำสั่ง จะถูกลบออกจากเวิร์กชีตปัจจุบันทันที
ลบปุ่มควบคุมฟอร์มหรือปุ่มคำสั่งทั้งหมดด้วยรหัส VBA
หากคุณต้องการลบปุ่มควบคุมฟอร์มทั้งหมดหรือปุ่มคำสั่งทั้งหมดออกจากแผ่นงานที่ใช้งานอยู่ คุณสามารถลองใช้โค้ด VBA ด้านล่างเพื่อให้บรรลุผลดังกล่าว
1. เปิดแผ่นงานที่มีปุ่มที่คุณต้องการเอาออกจากนั้นกดปุ่ม อื่น ๆ + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูลจากนั้นคัดลอกโค้ด VBA ด้านล่างลงในหน้าต่าง Code
รหัส VBA: ลบปุ่มควบคุมแบบฟอร์มทั้งหมดออกจากแผ่นงานที่ใช้งานอยู่
Sub Clear_ButtonsActiveSheet()
ActiveSheet.Buttons.Delete
End Sub
รหัส VBA: ลบปุ่มคำสั่งทั้งหมดออกจากแผ่นงานที่ใช้งานอยู่
Sub Clear_ButtonsActiveSheet()
Dim xOLE As Object
On Error Resume Next
For Each xOLE In ActiveSheet.OLEObjects
If TypeName(xOLE.Object) = "CommandButton" Then
xOLE.Delete
End If
Next
End Sub
3 กด F5 กุญแจสำคัญในการเรียกใช้รหัส
จากนั้นปุ่มควบคุมแบบฟอร์มหรือปุ่มคำสั่งทั้งหมดจะถูกลบออกจากแผ่นงานปัจจุบันทันที
บทความที่เกี่ยวข้อง:
- วิธีแทรกแถวใหม่ว่างโดยอัตโนมัติโดยปุ่มคำสั่งใน Excel
- วิธีใช้ปุ่มคำสั่งเพื่อบันทึกแผ่นงานที่ใช้งานเป็นไฟล์ PDF ใน Excel
- วิธีอัปเดตหรือแทรกวันที่และเวลา (ปัจจุบัน) ด้วยปุ่มคำสั่งใน Excel
- วิธีใช้ปุ่มคำสั่งเพื่อเปลี่ยนค่าเซลล์ที่ระบุใน Excel
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!