很简单的表格，出现不同的单元格格式太多，求解

z181336093 · 发表于 2011-8-15 11:26

dg831451 发表于 2009-11-20 16:42
请VBA的写了一个代码删除多余的格式。。

Sub X()

感谢，非常感谢啊。。

hhy0206 · 发表于 2011-12-8 08:03

非常的谢谢。老是有这样的情况。

shaokui123 · 发表于 2012-1-10 13:05

{:soso_e176:}

shaokui123 · 发表于 2012-5-3 08:46

7楼很强大，好用

不会疼女孩 · 发表于 2012-5-3 11:49

dg831451 发表于 2009-11-20 16:42
请VBA的写了一个代码删除多余的格式。。

Sub X()

怎么写VBA 我正愁着删除多余的格式呢

steven101 · 发表于 2012-8-21 15:50

03版和07版的行和列都不一样多。。。

uahneqbu · 发表于 2014-5-19 15:12

谢谢楼上提供的语句，解决了。

~香香~ · 发表于 2015-1-31 21:10

不懂VBA，怎么办？往哪里复制呀

jwcxl · 发表于 2016-1-27 23:37

Sub DelCustomStyles()
Dim st As Style
For Each st In ActiveWorkbook.Styles
If Not st.BuiltIn Then st.Delete
Next
End Sub

这个包好~！自己试过~！

zylz9941 · 发表于 2016-12-20 11:54

xtanuihazfh 发表于 2011-5-14 19:47
'运行下面的这个宏,删除所有非系统的单元格样式,可能运行时间要长一点,1W多个单元格样式删了一分钟多

运兴了之后就“未反应”，卡死了。

		自动登录	找回密码
密码			免费注册

[已解决] 很简单的表格，出现不同的单元格格式太多，求解