EXCEL减肥一得

近来同事一EXCEL文件,有十余个工作表，只是记录一些客户资料的文本信息,内容不多,但文件很大,打开也非常慢。在各工作表查找对象也没有发现。

经检查，发现在文件打开后，windows临时文件夹中产生数百个小的临时文件（扩展名为EMF），由此判断文件中含有很多的图片垃圾，可能会是将图片或其他对象插入工作表后又将工作表删除引起（估计，可能是EXCEL的BUG），在文件中加入以下代码执行后解决 Sub thinme() Dim sh As Worksheet, sp As Shape For Each sh In ActiveWorkbook.Sheets For Each sp In sh.Shapes sp.Delete Next sp Next sh End Sub

我以此建议大家在文件不明原因的增大时，在打开文件时查看一下Windows临时文件夹中是否增加了很多临时文件，如果有这种情况，不妨用这种方法试试