清理excel2007里的自定义样式

有些excel表格打开后,其样式面板有这么多自定义样式,excel_style_too_many

是不是很恐怖?反正我是很看不顺眼,找一方法清理(来源),使用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,打开“宏”对话框,执行“DelCustomStyles”宏即可一次删除所有自定义单元格样式,而内置的单元格样式会保留,如下图。

删除自定义单元格样式后的样式库

说明:删除全部自定义单元格样式后,对于应用过这些样式的单元格或区域,其单元格格式也会同时被清除。

方法来源:http://www.excel123.cn/Article/excelvba/201203/933.html




coded by nessus
发表评论?

0 条评论。

发表评论