ASP/Visual Basic Code復(fù)制內(nèi)容到剪貼板
- Sub DelCustomStyles()
- Dim st As Style
- For Each st In ActiveWorkbook.Styles
- If Not st.BuiltIn Then st.Delete
- Next
- End Sub
2.關(guān)閉VBA編輯器,返回Excel界面。按Alt+F8,打開“宏”對(duì)話框,執(zhí)行“DelCustomStyles”宏即可一次刪除所有自定義單元格樣式,而內(nèi)置的單元格樣式會(huì)保留。