Skip to content

Instantly share code, notes, and snippets.

@fornext1119

fornext1119/DeleteNames.bas

Created September 9, 2013 02:10
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save fornext1119/6490701 to your computer and use it in GitHub Desktop.
Save fornext1119/6490701 to your computer and use it in GitHub Desktop.
Download ZIP
Excel の 名前定義 を 一括削除
Raw
DeleteNames.bas
Public Sub DeleteNames()
For Each nm In ActiveWorkbook.Names
Debug.Print nm.Name
nm.Delete
Next
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment