excel VBA 名前削除

名前削除サンプルプログラム

Dim n As Name

    For Each n In ActiveWorkbook.Names

    On Error Resume Next  ' エラーを無視。

    n.Delete

Next