精易论坛

标题: excel单元格转图片保存 [打印本页]

---

作者: liwei321gogo    时间: 2024-4-23 14:42
标题: excel单元格转图片保存


WPS功能.e (11.55 KB, 下载次数: 56)

2024-4-24 09:49 上传

点击文件名下载附件
下载积分: 精币 -2 枚

更新一下，加入一种截图模式，两种模式对比


png高清格式：

---

作者: zifeiyu    时间: 2024-4-23 15:04
6666666666666666666666666

---

作者: wuqingg    时间: 2024-4-23 15:20
支持开源~！感谢分享

---

作者: gaoqing    时间: 2024-4-23 16:25
谢谢分享

---

作者: shuya1    时间: 2024-4-23 17:18
谢谢分享

---

作者: renjianhong48we    时间: 2024-4-23 18:45
感谢分享

---

作者: 小磊88    时间: 2024-4-23 19:22
很实用，就喜欢这样的资料。

---

作者: ttggnn    时间: 2024-4-23 20:50
支持开源

---

作者: xf702    时间: 2024-4-23 22:22
看看。。

---

作者: fire9    时间: 2024-4-24 00:22
支持了。感谢分享

---

作者: 二哥哥555    时间: 2024-4-24 00:42
支持了。感谢分享

---

作者: 花间一壶酒    时间: 2024-4-24 01:53
用图表的方式获取的图片  会有黑边 且清晰度低  不如复制区域后 从剪辑版导出图片 会清晰很多类似手动复制粘贴出来的图片

---

作者: 查过    时间: 2024-4-24 07:35
感谢发布原创作品，精易因你更精彩！6666666666666

---

作者: 豆豆灰常开心    时间: 2024-4-24 07:39
感谢发布原创作品，精易因你更精彩！6666666666666

---

作者: year1970    时间: 2024-4-24 07:54
感谢分享

---

作者: 小虎来了    时间: 2024-4-24 09:04
感谢分享

---

作者: 396384183    时间: 2024-4-25 08:18
支持开源~！感谢分享

---

作者: bianyuan456    时间: 2024-4-26 14:06
已经顶贴，感谢您对论坛的支持！

---

作者: Masonic    时间: 2024-4-26 15:21
感谢分享

---

作者: vilionly    时间: 2024-4-27 09:25
点赞点赞点赞！

---

作者: 光影魔术    时间: 2024-4-27 22:50
感谢分享，正好需要

---

作者: kyo9766    时间: 2024-4-29 14:33
这个需要安装 WPS 之后才可以使用吗

---

作者: xf702    时间: 2024-8-10 20:34
感谢。。。

---

作者: 小学生123    时间: 2024-11-16 00:28
感谢分享

---

作者: rateltalk    时间: 2025-1-8 14:54


怎么可以过滤隐藏的sheet

---

作者: rateltalk    时间: 2025-1-9 14:56
方法2点击没反应

---

作者: liwei321gogo    时间: 2025-1-9 16:33
按钮2点击没反应可以修改

---

作者: liwei321gogo    时间: 2025-1-9 16:33

  

子程序名	返回值类型	公开	备 注
_按钮2_被单击

变量名	类 型	静态	数组	备 注
ws	对象
rng	对象
cobj	对象
aaa	剪辑版数据		0
i	整数型

ws ＝ wks对象.对象型方法 (“Item”, 1)
rng ＝ ws.对象型方法 (“Range”, 编辑框1.内容)
rng.对象型方法 (“CopyPicture”, 1, -4147)
剪辑板_取所有内容 (aaa)
计次循环首 (取数组成员数 (aaa), i)
如果真 (aaa [i].字节集长度 ＞ 1000)
写到文件 (“.\33.png”, aaa [i].字节集数据)  ' 保存位置
跳出循环 ()

计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 ws, 对象<br /> .局部变量 rng, 对象<br /> .局部变量 cobj, 对象<br /> .局部变量 aaa, 剪辑版数据, , "0"<br /> .局部变量 i, 整数型<br /> <br /> ws ＝ wks对象.对象型方法 (“Item”, 1)<br /> rng ＝ ws.对象型方法 (“Range”, 编辑框1.内容)<br /> rng.对象型方法 (“CopyPicture”, 1, -4147)<br /> 剪辑板_取所有内容 (aaa)<br /> .计次循环首 (取数组成员数 (aaa), i)<br />     .如果真 (aaa <i>.字节集长度 ＞ 1000)<br />         写到文件 (“.\33.png”, aaa <i>.字节集数据)  ' 保存位置<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()

按钮2点击没反应的可以修改成这个代码

---

作者: futiem    时间: 2025-2-26 17:01
加入一种截图模式，两种模式对比

---

作者: 涤尘    时间: 2025-4-3 21:12
水

---

作者: XJxaiojing    时间: 2025-4-4 05:27
很有价值的帖子，谢谢楼主！

---

作者: 玫瑰很扎手    时间: 2025-4-28 18:27
学习学习

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4