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

2025-11-06 18:31:18

1、1.按Alt+F11打开VBA编辑器，在代码窗口中输入下列代码：

Sub DelCustomStyles()

Dim st As Style

For Each st In ActiveWorkbook.Styles

If Not st.BuiltIn Then st.Delete

End Sub

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

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

声明：本网站引用、摘录或转载内容仅供网站访问者交流或参考，不代表本站立场，如存在版权或非法内容，请联系站长删除，联系邮箱：site.kefu@qq.com。