Excel 表示されない名前定義を削除する

Excel 表示されない名前定義を削除する

[Excel]

• Excelの見えない名前定義を削除する方法

対処法

• マクロを実行後、「挿入」→「名前」→「定義」を選択し、名前の定義ダイアログを表示
• 不要なものは削除

Public Sub DeleteNames()
    Dim wName As Object
    Dim wCnt As Long

    For Each wName In Names
        If wName.Visible = False Then
            wName.Visible = True
            wCnt = wCnt + 1
        End If
    Next
    If wCnt <> 0 Then
        MsgBox wCnt & "個の名前定義が見つかりました。",vbInformation
    Else
       MsgBox "非表示の名前定義はありません。",vbExclamation
    End If
End Sub