Excel单元格【样式】里自动生成很多无用是样式，如何不让它生成？或者如何批量删除？
发布网友
发布时间：2022-04-24 09:34
共1个回答
热心网友
时间：2023-10-09 11:42
录制宏
请点击输入图片描述
位置：个人宏工作簿
请点击输入图片描述
1. 若出现以下情况，按在视图---〉取消隐藏窗口
请点击输入图片描述
1. 停止录制宏
请点击输入图片描述
1. 查看宏
请点击输入图片描述
1. 编辑宏
请点击输入图片描述
1. 宏所有内容替换为 “批量删除单元格样式.txt ”中的内容（将下面的代码用TXT文件保存：
Sub 批量删除单元格样式()
For Each s In ActiveWorkbook.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 Sub
请点击输入图片描述
请点击输入图片描述
1. 关闭文件后保存宏
请点击输入图片描述
1. 查看宏，运行该宏就可以保存为 97-2003 格式
请点击输入图片描述
