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
© 2006 矢木浩人