您的位置: 首页 > EXCEL技巧 > ExcelVBA >

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

时间:2014-10-11 整理:docExcel.net

在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,打开“宏”对话框,执行“DelCustomStyles”宏即可一次删除所有自定义单元格样式,而内置的单元格样式会保留,如下图。

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

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

Excel2003基础教程:样式列表,快速换行 问题:Excel2003基础教程:样式列表,快速换行
回答:...格内文本自动换行就好了。经过实践,发现可以通过使用样式列表快速实现这一功能下面是具体操作步骤。 一、在格式工具栏中添加样式列表 ①在Excel的任一工具栏上单击右键,从弹出菜单中选择“自定义”命令。 ②...
Excel2007套用现成表格样式gif动画演示教程 问题:Excel2007套用现成表格样式gif动画演示教程
回答: Excel2007及以上版本提供了许多漂亮的预定义表格样式,我们可以为数据表轻松快速地套用格式。如果预定义的表样式不能满足需要,还可以创建并应用自定义的表格样式。 应用表格样式方法如下。 ①在工作表中选择需要设...
Word表格中自定义实现填充项目符号和编号 问题:Word表格中自定义实现填充项目符号和编号
回答:...与编号”,进入“编号”选项卡; ③选择一种样式,单击“自定义”按钮打开“自定义编号列表”对话框进行修改。可以改变编号格式、编号样式、编号位置以及文字位置。 具体操作方法,请大家参考...
在excel里怎么自定义边框线的粗细 问题:在excel里怎么自定义边框线的粗细
回答:...“外边框”和“内部”两个方块都按下去; 4.点“线条样式”里面自己需要的线条样式; 5.点“确定” OK!完成了
最新Word2010技巧大全 问题:最新Word2010技巧大全
回答:...和编号”,进入“编号”选项卡,选择任意一种样式,单击“自定义”按钮,在“自定义编号列表”窗口中“编号格式”栏内输入要填充的内容,在“编号样式”栏内选择“无”,依次单...
巧用十个Word2003小技巧 问题:巧用十个Word2003小技巧
回答:...和编号”,进入“编号”选项卡,选择任意一种样式,单击“自定义”按钮,在“自定义编号列表”窗口中“编号格式”栏内输入要填充的内容,在“编号样式”栏内选择“无”,依次单...
相关推荐: