工作软件excel批量删除单元格 样式

1、录制宏

3、若出现以下情况，按在视图---〉取消隐藏窗口

5、查看宏

7、阢蜃仟燔宏所有内容替换为“批量删除单元格样式.txt”中的内容（将下面的代码用TXT文件保存：Sub批量删除单元格样式()ForEa艘早祓胂chsInActiveWorkbook.Styles'MsgBoxs.NameOnErrorResumeNextIfLen(s.Name)>0Ands.Name<>"Normal"Thens.DeleteEndIfIfErr.Number>0Thene="ErroroccourondeletingStylenamed"&s.Namee=e&vbCrLf&"Err:"&Err.Number&"->"&Err.DescriptionMsgBoxeErr.ClearEndIfNextEndSub

8、关闭文件后保存宏