发送【交流】
立即进秋叶 Excel 读者快乐交流群！
大家好，我是和 Excel「相爱相杀」的小兰~
前两天，自诩「精通」Excel 的我，狠狠在上面栽了一个跟头。
发生了什么事？
但是，一旦这些图片被 Excel「困」住了呢？
通俗点来讲，其实就是把动图塞到了 Excel 里，但是却没办法「另存为图片」。。
（当时也就是随手一放，真没想到以后还有用到的机会……大家千万不要学我，资料什么的还是要及时归纳整理好。）
问题是怎么解决的？
在某度上花样搜索了十几分钟无果之后，我突然想起了以前写过一篇文章，里面提到了【批量导出图片】的方法，虽然导出的不是动图，但是！可以一试！
导出 Excel 里的动图操作步骤其实挺简单的，也不需要额外下载一些软件，只要你的电脑能压缩/解压文件就行。?? 将 Excel 文件的后缀名改为压缩文件格式：Zip 或者 Rar 都可以。
小 TIPS：① 选中文件后，按【F2】键可以快速重命名。
?? 双击打开刚刚的压缩文件，依次双击「xl」-「media」，就能看到已经保存好的图片了。
很简单，对吧。看起来如此令人头疼的一个事情，居然就这么解决了，简直是……
那看到这里，相信有不少小伙伴都在想，既然 Excel 可以，那 PPT 和 Word 行吗？行，当然行！操作步骤大致和 Excel 是一样的，只需要注意两点：?? 在 PPT 中，将 PPT 文件改成压缩文件后，动图储存路径是：「PPT」-「media」。?? 在 Word 中，将 Word 文件改成压缩文件后，动图储存路径是：「Word」-「media」。另外，Word 是能够直接另存为动图的，如果图片不多，鼠标右键走起~
强烈建议大家收藏本文，以后就算遇到了这个问题，也不会手忙脚乱！
拓展丨如何导出 Excel 里的图片？相对于前面提到的「导出动图」，我们遇到这个问题的概率要大那么亿点点。
方法也是有的，而且不止一种，大家可以根据自己的需求选择合适的。第一种就是上面提到的改拓展名-解压。具体操作可以看这篇文章：如何将 Excel 表格保存为图片？第 3 种方法你一定想不到，太好用了！第二种方法是用 VBA。这种方法的好处是，能够在导出图片时顺便给图片命名~
注意：图片必须放在和名称对应的单元格里面，并且不能超出单元格范围太多，否则后续操作会出错。?? 操作步骤：?? 把后缀是.xlsx 的文件另存为.xlsm。
使用的代码如下：Sub main()Dim shp As ShapeFor Each shp In ActiveSheet.Shapesshp.CopyWith ChartObjects.Add(0, 0, shp.Width, shp.Height).Chart.Parent.Select.Paste.Export “D:\” & shp.TopLeftCell.Offset(0, -1) & “.png”.Parent.DeleteEnd WithNext shpEnd Sub▲ 左右滑动查看代码：D:\表示图片保存在电脑 D 盘，路径可替换。
Offset(0, -1)表示名称列在图片左边 1 列，可修改。
.png表示导出的图片是 png 格式，可以根据自己的需求替换。
想学习更多 Excel 高效操作早下班？来《3 天 Excel 集训体验营》吧~专为职场人准备，全部基于职场真实表格案例设计，超实用 Excel 技巧集合教学。从此不愿再为表格而加班，那就行动起来！3 天搞定表格难题！《秋叶 Excel 3 天集训营》想提升，趁现在！福利名额 仅限前50不再被加班支配，不再为表格发愁！免费赠送【35 个常用函数说明】哦！赶紧扫码预约吧！??????
