excel文件占用空间大 xls xlsx等文件

excel命名没什么内容，占用空间却异常大，打开也很慢。

经过多次尝试，发现主要是隐藏表、对象、自定义样式过多引起。

1、隐藏表

针对隐藏表就比较简单，打开文件后alt+F11，打开VBE，挨个查看文件的sheet页的visible属性是否有hidden，对多余的sheet页进行删除即可。

2、对象

手动方式为打开文件后ctrl+G，选择对象，看是否能定位到，挨个页面尝试

vba方式为

Sub DeleteAllObject()

For i = 1 To ActiveWorkbook.Worksheets.Count

Dim j As Object

For Each j In Sheets(1).Shapes

j.Delete

Next j

Next i

End Sub

放入 vbe的ThisWorkbook运行

3、样式

先确认下文件是否有很多自定义样式，在开始功能标签下，样式功能区，点展开，如果自定义样式不多就不用清理了，如果多就也上vba代码吧，注意，该代码在自定义样式较多时，可能导致excel假死一会儿，等着就行。

也是放入 vbe的ThisWorkbook运行，上代码

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

亲测，完成以上3部分的检查清理，文件回归到正常大小。如有其它欢迎探讨。