VBA批量删除自定义单元格样式

1、岳蘖氽颐按Alt+F11打开VBA编辑器，在代码窗口中输入下列代码： Sub DelCustomStyles() D足毂忍珩im st As Style For Each st In ActiveWorkbook.Styles If Not st.BuiltIn Then st.Delete Next End Sub

2、关闭VBA编辑器，返回Excel界面。按Alt+F8，打开“宏”对话框，执行“DelCustomStyles”宏即可一次删除所有自定义单元格样式，而内置的单元格样式会保留。