Excel电子表格工作簿减肥秘招

1、很多用户都遇到过Excel文件在使用过程中不断增肥，反应越来越迟钝的现象，甚至发生文件损坏而丢失重要数据的可怕事件。如果是因为有大量数据的输入，那么文件体积增加也无可非议，此时应该通过优化表结构、把数据分散保存到多个工作簿文件的方法来减小单个文件的体积。然而，在很多时候，这些拥有臃肿”身材的工作簿文件里面只有少量的数据，那么，它是怎么肥”起来的呢？本技巧中会罗列一些常见的Excel文件体积虚增的原因及处理办法。1工作表中存在大量的细小图形对象工作表中如果存在大量的细小图形对象，那么文件体积就可能在用户毫不知情的情况下暴增，这是一种很常见的“Excel肥胖症”。可以使用下面两种方法来检查Exce

2、l工作表是否存在这种症状。(1)在工作表中按键调出定位”对话框，单击定位条件按钮，在定位条件”对话框中选择对象”项，单击确定”，如图1所示。然后观察工作表上是否会显示很多被选定的对象。C讦闻:；.:期曙左眸昨元曙IPe引用单元晶吧.i日1目.yI旨嘩：C耳国单元恬0U：:ft.SKStiii式Q嶽対有址社I全田Lia24-1使用*定悅“功能査找屈覆如果工作簿中包含多个工作表，需要在每个工作表中用这种方法进行查找。关于定位”功能的更多技巧，请参阅技巧28。注意：隐藏列或行中的对象利用这种方法无法被看到。(2)用VBA对工作簿中的对象进行计数，查看在每个工作表中实际存在的对象数量，如果此数量不合理

3、,就说明有问题。按打开VBA编辑器窗口，单击菜单插入”一模块”来插入一个新模块，默认情况下为模块1”，然后在模块1的代码窗口中输入以下代码：SubCountShapes()DimnAsDoubleDimwsAsWorksheetDimContentAsStringForEachwsInWorksheetsn=ws.Shapes.CountContent=Content&工作表&ws.Name&有&n&个对象&vbCrLfNextMsgBoxContentEndSub最后，按F5键来运行这段代码，就能看到检查结果。在看似空白的工作表中，存在着大量的图形对象,如图2所示。12=-2史用0捡漁.工徉

4、谖中的痢取蠢姐如果确认在工作表中存在大量的对象，而用户并不需要它们，可以用两种方法来处理：刚才的定位方法中，当对象全部处于被选择状态时按键删除它们即可。使用宏在多个工作表中更加精确地删除这些无用对象。比如，可以根据需要只删除高度和宽度都小于14.25磅(0.5cm)的对象。只删除活动工作表中特定大小的对象的代码为：SubDelShapes()DimspAsShape,nForEachspInActiveSheet.ShapesIfsp.Width14.25Andsp.Height14.25Thensp.Deleten=n+1EndIfNextspMsgBox共删除了&n&个对象EndSub删除

5、所有工作表中的特定大小的对象的代码为：SubDelAllShapes()DimwsAsWorksheetDimspAsShapeDimnAsDoubleDimContentAsStringForEachwsInWorksheetsForEachspInws.ShapesIfsp.Width14.25Andsp.Heighti：Step单击礬尸槛斗卄芥咼”.设说一平國定看高曲飾畀Step按43纽台kj罡全藹卑无施，跟击燕串格盘.tr*“用适合的齐荷-6使用了大图片作为工作表背景如果使用了较大的图片作为工作表的背景，也会造成文件体积增大。比如在工作表使用了一个10MB的TIFF格式图片作为背景，那

6、么这个Excel文件里面即使没有任何数据，其体积也会超过10MB。因此，除非特别需要，不要使用工作表背景功能。如果确实需要，那么用作背景的图片要尽可能的小。7工作表中插入的图片格式影响文件的大小如果把BMP、TIFF等高容量格式的图片插入到工作表中，或从绘图软件中直接复制图片粘帖到工作表中，也会造成文件体积大增。尽管Excel可以对已插入的图片进行压缩，但最好还是先把要插入的图片进行转换、压缩，比如转换为JPG等图片格式，再进行插入。8共享工作簿引起的体积虚增许多被长时间使用的共享工作簿，文件体积也会常常虚增到正常情况下的几倍甚至几十倍。很少有专门的资料介绍共享工作簿的弊端，这也许是由于多人同时使用的过程中产生了许多过程数据存放于工作簿文件内而没有得到及时的清理造成的。对于因此而体积虚增的工作簿文件，可以尝试取消共享工作簿”，然后保存文件。通常情况下，就能起到恢复文件正常体积的效果。如果需要继续与他人使用共享工作簿，可以再次开启共享工作簿。9其他未知原因也许还有其他未知原因会造成Excel文件患上肥胖症”，在此情况下，可以尝试以下方法。再次保存后得到的文件，通常会比原来的文件要小很多。Step打开；玄城订的Ee1i：h,贰击萇单-文JK月f；为希霑3网页JStep1-另特为一炖话松中甲“保整个工作ar.不浜勾r-添$交互文件題文本榷中输入任惫文件名,吟确定j