《excel2007表格样式如何删除.doc》由会员分享,可在线阅读,更多相关《excel2007表格样式如何删除.doc(2页珍藏版)》请在三一文库上搜索。
1、excel2007表格样式如何删除篇一:如何批量删除2007版excel表格的自定义单元格样式 如何批量删除2007版excel表格的自定义单元格样式 在Excel中可通过内置或自定义的单元格样式直接设置单元格格式,十分方便。而在Excel 2007/2010中,在“开始”选项卡的“样式”组中,单击“单元格样式”可在样式库中直接选择,显得更加方便。 方法/步骤: 1.按Alt+F11打开VBA编辑器,在代码窗口中输入下列代码: Sub DelCustomStyles() Dim st As Style For Each st In ActiveWorkbook.Styles If Not st
2、.BuiltIn Then st.Delete Next End Sub 2.关闭VBA编辑器,返回Excel界面。按Alt+F8,打开“宏”对话框,执行“DelCustomStyles”宏即可一次删除所有自定义单元格样式,而内置的单元格样式会保留。篇二:一次性删除自定义样式方法-excel2007 一次性删除自定义样式方法-excel2007(2014-05-08 13:28:10) 转载 标签: 分类: 职场人 杂谈 有时候面对自己的excel里莫名出现(其实还是因为人工操作导致的)的超多自定义样式,非常苦恼,如图所示,可以利用VBA编辑一次性删除。 1.打开VBA编辑器(alt+f11)
3、,在代码窗口中输入下列代码: 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”宏即可一次删除所有自定义单元格样式,而内置的单元格样式会保留。 分享:篇三:EXCEL2007删除自定义样式宏命令 EXCEL2007删除自定义样式宏命令 Sub X() For Each s In Active
4、Workbook.Styles MsgBox s.Name On Error Resume Next If Len(s.Name) 0 And s.Name <"Normal" Then s.Delete End If If Err.Number 0 Then e = "Error occour on deleting Style named " & s.Name e = e & vbCrLf & "Err:" & Err.Number &"->" & Err.Description MsgBox e Err.Clear End If Next End Subexcel2007表格样式如何删除