在Excel中可通過內置或自定義的單元格樣式直接設置單元格格式，十分方便。而在Excel 2007/2010中，在“開始”選項卡的“樣式”組中，單擊“單元格樣式”可在樣式庫中直接選擇，顯得更加方便。
有時會遇到這種情況，工作簿中的自定義單元格樣式非常多，需要將其全部刪除，如果手動逐一操作顯得有些繁瑣，如下圖所示的自定義單元格樣式。
這時用下面的VBA代碼可一次刪除所有的自定義單元格樣式，方法如下。
1.按Alt+F11打開VBA編輯器，在代碼窗口中輸入下列代碼：
Sub DelCustomStyles()
Dim st As Style
For Each st In ActiveWorkbook.Styles
If Not st.BuiltIn Then st.Delete
Next
End Sub
2.關閉VBA編輯器，返回Excel界面。按Alt+F8，打開“宏”對話框，執(zhí)行“DelCustomStyles”宏即可一次刪除所有自定義單元格樣式，而內置的單元格樣式會保留，如下圖。
說明：刪除全部自定義單元格樣式后，對于應用過這些樣式的單元格或區(qū)域，其單元格格式也會同時被清除
