Xóa tất cả các Defined Name trong Excel

Trong Excel không có lệnh thực hiện yêu cầu của bạn mà phải tạo Macro để thực hiện công việc này cách thức như sau
Mở Excel
Bấm tổ hợp phím Alt-F11 để vào cửa sổ Visual Basic
Bấm menu Insert , chọn Module , bạn Copy theo nội dung dưới đây
Sub DeleteRangeNames()
    Dim nName As Name
    Dim lReply As Long
    
    For Each nName In Names
       
        nName.Delete
               
    Next