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