如何批量压缩Excel中图片大小
为什么需要批量压缩Excel中的图片？
在Excel工作表中插入大量图片后，文件体积会迅速膨胀，导致打开、保存、发送变得缓慢。批量压缩图片是优化性能、节省存储空间的关键。
方法一：使用Excel内置压缩功能（适用于少量图片）
Excel自带图片压缩功能，但只能逐张或逐张选中操作，不够高效。步骤如下：
- 选中一张或多张图片（按住Ctrl键多选）。
- 在图片格式工具栏中点击“压缩图片”。
- 选择“电子邮件”或“网页”分辨率，取消勾选“仅应用于此图片”以压缩所有图片。
- 点击确定。
注意：此方法会降低图片分辨率，建议先备份原文件。
方法二：使用VBA宏批量压缩（推荐）
VBA宏可以自动遍历工作表中所有图片并压缩。按Alt+F11打开VBA编辑器，插入模块并粘贴以下代码：
Sub CompressAllPictures()
Dim pic As Picture
For Each pic In ActiveSheet.Pictures
pic.ShapeRange.PictureFormat.Compress msoTrue, msoTrue, xlPrinter
Next pic
End Sub运行前请确认引用：工具→引用→勾选“Microsoft Office XX.0 Object Library”。运行宏后所有图片将被压缩到适合打印（150 DPI）的分辨率。如需更激进压缩，可将xlPrinter改为xlWeb或xlScreen。
方法三：借助第三方插件
如“FileSize Reducer”或“Ablebits Ultimate Suite”等插件提供一键压缩功能。以Ablebits为例：安装后，在Ablebits标签页点击“压缩图片”，选择压缩等级（如“网页150 DPI”），即可批量处理。
总结与建议
- Excel内置功能：适合偶尔处理少量图片。
- VBA宏：免费、灵活，适合有编程基础的用户。
- 第三方插件：操作简单，但可能需要付费。
无论哪种方法，建议先保存原文件备份。压缩后检查图片显示效果，避免过度失真。