精易论坛

标题: word转图片并一键导出图片 [打印本页]
作者: dych1688    时间: 2024-1-7 13:19
标题: word转图片并一键导出图片
1. 文字和图片利用选择性粘贴的方法复制粘贴到新文档中，并在新文档中转为inlineshape对象2. 导出图片到文件夹
说明. 导出图片格式emf格式的，照片格式自己转换把，这个没有做。

  
变体型5.赋值 (i, )
r1 ＝ word_doc1.Fun_GoTo (变体型3, 变体型4, 变体型5)
变体型6.赋值 (i ＋ 1, )
' word_doc1.Fun_Activate ()
r2 ＝ word_doc1.Fun_GoTo (变体型3, 变体型4, 变体型6)
posend ＝ r2.Get_End ()
' 输出调试文本 (i, r1.Get_Start (), r1.Get_End (), r2.Get_Start (), posend, r1.Get_Text ())
 ' 到循环尾 ()
如果真 (r2.Get_End () ＝ r1.Get_Start ())
posend ＝ word_doc1.Get_Content ().Get_End ()

变体型7.赋值 (r1.Get_Start (), )
变体型8.赋值 (posend, )
' 变体型8.赋值 (r2.Get_End (), )
word_doc1.Fun_Range (变体型7, 变体型8).Fun_Copy ()
' word_doc2.Get_Content ().Fun_InsertParagraph ()
sel.Fun_EndKey ()
sel.Fun_PasteSpecial (, , , , 变体型9)
word_doc2.Get_Content ().Get_ShapeRange ().Fun_ConvertToInlineShape ()



word转图片.e (2.28 MB, 下载次数: 69)
模块都是论坛下载的，都有源码。
作者: 447485268    时间: 2024-1-7 13:23
支持开源~！感谢分享
作者: futiem    时间: 2024-1-7 13:53
#在这里快模块都是论坛下载的，都有源码。速回复#
作者: lhbismy1    时间: 2024-1-7 14:19
非常感谢
作者: aiso    时间: 2024-1-7 16:34
支持开源~！感谢分享
作者: 訫向荣    时间: 2024-1-7 17:22
#在这里快速回复# 支持开源~！感谢分享
作者: zifeiyu    时间: 2024-1-7 18:32
6666666666666666
作者: renjianhong48we    时间: 2024-1-7 20:23
感谢分享
作者: ttggnn    时间: 2024-1-7 20:26
感谢分享
作者: bianyuan456    时间: 2024-1-7 20:34
已经顶贴，感谢您对论坛的支持！
作者: bianyuan456    时间: 2024-1-7 20:40
已经顶贴，感谢您对论坛的支持！
作者: 月下美孤    时间: 2024-1-7 20:45
本帖最后由 月下美孤 于 2024-1-7 20:51 编辑

你这太麻烦了，还要调用一遍steam.   不如直接调用word.get_Selection().cut()  ，然后再取剪辑板图片，效率高很多
对了，还有个小细节，cut（）之前需要选取范围，我们用 word.get_Selection().WholeStory（）就可以全选拉！
作者: 月下美孤    时间: 2024-1-7 20:46
月下美孤 发表于 2024-1-7 20:45
你这太麻烦了，还要调用一遍steam.   不如直接调用word.get_Selection().cut()  ，然后再取剪辑板图片，效 ...

我看论坛好多人需要doc、excel转图片，我基本已经完成了代码，等春节前后我就开源滴
作者: zyhsy    时间: 2024-1-7 21:56
支持开源~！感谢分享
作者: 查过    时间: 2024-1-8 07:31
感谢分享，很给力！~
作者: 豆豆灰常开心    时间: 2024-1-8 07:35
已经顶贴，感谢您对论坛的支持！
作者: pipicool    时间: 2024-1-8 08:34
学习一下
作者: 一指温柔    时间: 2024-1-8 10:01
支持开源~！感谢分享
作者: 鱼雨遇玉羽    时间: 2024-1-8 10:03
学习了{:3_52:}{:3_52:}{:3_52:}
作者: 396384183    时间: 2024-1-8 10:56

看看 学习一下~~~~~~~！
作者: happyweeks365    时间: 2024-1-8 13:00
666666666666666666666
作者: zaozi    时间: 2024-1-8 13:56
收藏了，谢谢分享
作者: xiaolang5499    时间: 2024-1-8 16:14
能行吗，看下怎么写的
作者: xf702    时间: 2024-1-8 19:43
感谢提供
作者: dych1688    时间: 2024-1-8 21:52
本帖最后由 dych1688 于 2024-1-8 21:55 编辑
月下美孤 发表于 2024-1-7 20:45
你这太麻烦了，还要调用一遍steam.   不如直接调用word.get_Selection().cut()  ，然后再取剪辑板图片，效 ...

刚才测试了一下，全选，剪切不行，只能单页选择性剪切。

要睡觉了，没认真测试。
作者: 查过    时间: 2024-1-9 07:42
已经顶贴，感谢您对论坛的支持！
作者: 豆豆灰常开心    时间: 2024-1-9 07:47
感谢您对论坛的支持！
作者: 胖子葛格    时间: 2024-1-9 09:33
感谢大神分享
作者: 小虎来了    时间: 2024-1-9 09:53
        感谢分享，很给力！~
作者: 胖子葛格    时间: 2024-1-11 13:45
感谢大神分享~！
作者: ctry78985    时间: 2024-1-11 20:25
支持开源~！感谢分享
作者: 月下美孤    时间: 2024-1-12 11:14
dych1688 发表于 2024-1-8 21:52
刚才测试了一下，全选，剪切不行，只能单页选择性剪切。

要睡觉了，没认真测试。

可以的，我测试成功了，过些日子开源了你来看
作者: xf702    时间: 2024-1-12 14:15
试试看，谢了。。
作者: 木水云梦    时间: 2024-1-17 17:16
变体形用不好
作者: SHIWOOOO    时间: 2024-1-23 10:07
好好好好
作者: 原始世界    时间: 2024-2-24 16:24
谢谢分享
作者: zhipengw    时间: 2024-4-27 14:08
月下美孤 发表于 2024-1-7 20:45
你这太麻烦了，还要调用一遍steam.   不如直接调用word.get_Selection().cut()  ，然后再取剪辑板图片，效 ...

有没有例子？发一下学习学习
作者: zhipengw    时间: 2024-5-26 21:43
感谢分享，很给力！~
作者: wsysyb    时间: 2024-6-1 18:12
谢谢分享
作者: wsysyb    时间: 2024-6-1 18:26
没有Stream.ec，根本用不了
作者: luguidong2018    时间: 2025-2-18 17:42
我看看什么好东西
作者: q644014653    时间: 2025-4-10 16:13
正需要这个
作者: q644014653    时间: 2025-4-13 22:13
瞧一瞧看看



欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4