Excel保存单元格区域为图片(支持13种文件格式、背景透明、半透明、矢量图)

fjdk22 · 发表于 2020-12-17 14:55

不错的源码，感谢分享

qlmgu · 发表于 2020-12-17 15:03

本帖最后由 qlmgu 于 2020-12-17 15:08 编辑

joforn 发表于 2020-12-17 14:53
什么意思？你是想要两个不相邻的区域？

抱歉，我没说明白。我想问问，如果想将任何一个其他区域存为图片，可以选择就好了。例如VBA提示区域，使用人填入A1:K21,程序直接把该区域存为图片，而不用去修改程序里的L1:R21。我外行，不知道说明白了没有。

joforn · 发表于 2020-12-17 15:07

qlmgu 发表于 2020-12-17 15:03
抱歉，我没说明白。我想问问，如果想打印任何一个其他区域，可以选择就好了。例如打印A1:K21,可以直接选 ...

你在自己的代码里直接调用：SaveRangeToPictrue(Range("??:??"), 要保存的文件名, -1)就好了啊，，，，
我在basTest里的代码只用来演示用的啊，你实际应用时要把整个basTest删除的啊。

qlmgu · 发表于 2020-12-17 15:09

joforn 发表于 2020-12-17 15:07
你在自己的代码里直接调用：SaveRangeToPictrue(Range("??:??"), 要保存的文件名, -1)就好了啊，，，，
...

谢谢，我试试。感谢版主指教。

liangdinghu · 发表于 2020-12-17 15:34

牛逼，正需要，下来看下

xiongsx · 发表于 2020-12-17 19:52

我来了，找到了一个

淡__ · 发表于 2020-12-17 22:34

1207834011 · 发表于 2020-12-17 22:52

感谢分享，收藏了

1207834011 · 发表于 2020-12-17 22:53

Excel保存单元格区域为图片,谢谢，收藏了。

xds1397088708 · 发表于 2020-12-18 07:04

ZIP文件格式：这货只是为了帮助我们把上面生成的文件打包成一个文件。直接调用Shell32生成，无需第三方库支持，但是要注意的是如果使用的Ghost版XP系统的话，有些Ghost系统会把zipfldr.dll文件精减删除了，需要自己再去重新下载一个注册重启后才能成功生成Zip文件

		自动登录	找回密码
密码			免费注册

[原创] Excel保存单元格区域为图片(支持13种文件格式、背景透明、半透明、矢量图)