第1个回答 2008-12-06
给你一个宏,可以删除所有图片的,我原来遇到过,很简单的表,几兆大,图片全删了之后只有不到500K了
Sub 删除工作表中的所有图形()
oldStatusBarStatus = Application.DisplayStatusBar
OldStatusBar = Application.StatusBar
Application.DisplayStatusBar = True
For Each 工作表 In ActiveWorkbook.Sheets
For Each 图形 In 工作表.Shapes
图形.Delete
Application.StatusBar = OldStatusBar & "还剩余图形 " & 工作表.Shapes.Count & " 个"
Next
Next
Application.StatusBar = False
Application.DisplayStatusBar = oldStatusBarStatus
Application.StatusBar = OldStatusBar
End Sub
第2个回答 2008-12-05
正常,文件肯定含有大量外部链接,或者里面有大量的运算公式在,或者里面的行数非常多,或者里面有大量的图片之类的,这些都直接也是最快增大文件的内容,我经常做过超过40M的,最大一个56M的呢,也照样打得开,现还存在硬盘上,不过电脑要求挺高,特别是CPU和内存.这些毕竞是文本文件,只要一压缩,就变成2-3M了,呵呵.