Microsoft Excel Tips and Tricks: การลบชื่อที่ให้ไว้กับเซลล์จำนวนมากในคราวเดียว (VBA...

การให้ชื่อไว้กับเซลล์หรือช่วงเซลล์จำนวนมากจะทำให้ไฟล์มีขนาดใหญ่ขึ้น หากไม่ใช้ชื่อนั้น ๆ แล้วควรจะทำการลบชื่อทิ้งไป การลบชื่อโดยเข้าเมนู Insert > Name > Define จะสามารถลบได้คราวละชื่อเท่านั้น หากต้องการลบชื่อจำนวนมาก ๆ ออกทั้งหมดในคราวเดียว ควรใช้ VBA ครับ ซึ่ง Code มีเพียงไม่กี่บรรทัดตามด้านล่าง

Sub DeleteNames()
    Dim n As Name
    For Each n In Names
       On Error Resume Next
       n.Delete
    Next n
End Sub