作者：乔山办公网日期：
返回目录：excel表格制作
'此代码用于解决EXCEl文件过大的问题。e799bee5baa6e997aee7ad94e78988e69d83337通过“清除”命令清除没有使用的单元格中被设置的格式等。
'将此代码COPY在工作薄的模块内，根据自己文档中各表实际使用的最大范围修改清除范围的设定后运行就OK。
'我是通过将工作薄中的表逐个地移动到空工作薄中，然后保存原表再检查文件大小变化情况，最终找出导致文件变大的那个表进行清除多余内容。
'用这工具将34M的一个工作薄清理到2.5M。
'使用前一定要在备份上运行，确定你要清除的范围是正确的。
'哪位有兴趣了给做个对话框，免得用错害了大家！
Sub 清除EXCEL多余文件()
For Each SH In Sheets
SH.Select
Rows("2001:65536").Select '代码中的范围是将要清除的整行行标。
'Columns("AA:BA").Select '这里可同时加入对列的清理，但建议不要作，如果触动了未激活的列，反而会增大文件。
Selection.Clear
Next
End Sub
特别说明一下，此操作要进入VBA窗口中，对于VBA不熟的那你就自己录个宏，然后在宏自己建的模块中粘贴运行就行了，运行前要将光标移至这段代码内。
EXCEL表格太大了，一页打印不了怎么办
1、如图所示zhidao 用来演示的表格大小为2.10MB
2、使用鼠标选中起始行 如图所示 左键单击15即可
3、然后同时键入Ctrl+Shrift+↓ 会选中起始行之下的所有表格
4、然后再键入Ctrl+-（减内号） 回到起始行 此时已清除无用对象了
5、回到表格所在的文件夹 你还看到 文件大小已经变容成19.8KB了
1、找到zd容量比较大的excel文件，右击文件，点击列表中的属性。
2、可以在属性界面中看到文件的大小，占用空间。
3、打开这个容量比较大的文件。
4、同时按住Ctrl+G，在界面中会出现一个对话框。
5、点击”定回位“选项“。
6、在”定位“界面中选择对象，然后点击：定位。
7、之后，答点击对话框中的对象，就会出现小虚线框，按住删除键就可以删除了。
8、操作完成以后，记得点击，“文件”--“保存”。
9、这时候，再右击文件，点击列表中的属性。
10、在属性界面中文件大小变小了一些，打开速度也变快了。