在Excel中可通過內(nèi)置或自定義的單元格樣式直接設置單元格格式,十分方便。而在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”宏即可一次刪除所有自定義單元格樣式,而內(nèi)置的單元格樣式會保留,如下圖。
說明:刪除全部自定義單元格樣式后,對于應用過這些樣式的單元格或區(qū)域,其單元格格式也會同時被清除。
來自:Excel技巧天地
鏈接:http://www.excel123.cn/Article/excelvba/201203/933.html
●本文編號354,以后想閱讀這篇文章直接輸入354即可
●輸入m可以獲取到全部文章目錄
●輸入c可以獲取到全部動畫下載地址