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