2013年12月18日水曜日

EXCELに名前が残ってこまった。

1.Ctrl+F3で手動で消す。
2.シートタブ→コード表示
  カット&ペースト
  実行
  ツール→マクロ→マクロ→削除

■スタイルの一括削除マクロ
Sub delstyle()
Dim s
On Error Resume Next
For Each s In ActiveWorkbook.Styles
If Not s.BuiltIn Then
s.Delete
End If
Next
End Sub

■名前の一括削除マクロ
Sub delname()
Dim s
On Error Resume Next
For Each s In ActiveWorkbook.Names
If Not s.BuiltIn Then
s.Delete
End If
Next
End Sub

0 件のコメント:

コメントを投稿

SSD比較

https://kakaku.com/prdcompare/prdcompare.aspx?pd_cmpkey=K0001673420_K0001588762_K0001559684_K0001504089_K0001546441_K0001662527&pd_ctg=0...