Loading... 按下Alt+F11打开VBA界面,左边工程处双击`ThisWorkBook` 在新窗口处输入以下代码 ``` Sub KillStyles() Dim style As Style On Error Resume Next For Each style In ActiveWorkbook.Styles If Not style.BuiltIn Then style.Delete End If Next style End Sub ``` 按F5运行即可 最后修改:2021 年 08 月 11 日 © 允许规范转载 打赏 赞赏作者 支付宝微信 赞 0 如果觉得我的文章对你有用,请随意赞赏