761 バイト追加
、 2020年2月15日 (土) 07:31
==Excel 表示されない名前定義を削除する==
[Excel]
*[http://crazycat.jp/?p=31 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