| 网站首页 | 业界新闻 | 小组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
共有 1397 人关注过本帖
标题:Word文档中固定模板的表格中的图片另存为文件的问题
只看楼主 加入收藏
预言家
Rank: 1
等 级:新手上路
威 望:2
帖 子:21
专家分:0
注 册:2019-12-20
结帖率:0
收藏
已结贴  问题点数:20 回复次数:12 
Word文档中固定模板的表格中的图片另存为文件的问题
3333.zip (816.45 KB)

Word文档中有多个表格,每个表格都是固定样式的。
我需要把表格指定位置的图片另存到一个文件夹中,并按需求进行命名。

如果能够直接复制该Word文档中的图片,粘贴到另一个Word文档的指定位置,也可以不存放到文件夹中了。

mrange=JccgWord.Documents(1).range(JccgWord.Documents(1).Tables(i).Cell(11, 1).Range.start,JccgWord.Documents(1).Tables(i).Cell(11, 1).Range.end)

我现在能够选中该图片,但是不会操作它。
有关于VFP操作Word的帮助文档也非常感谢。
搜索更多相关主题的帖子: 表格 固定 文档 图片 Word 
2020-01-10 11:53
xuminxz
Rank: 10Rank: 10Rank: 10
等 级:贵宾
威 望:26
帖 子:554
专家分:1888
注 册:2011-5-8
收藏
得分:7 
用粘贴板导出图片质量很差。可以将文档另存为HTML文件图片就出来了,如果量大想改名可以从HTML文件中找到对应的文件名。
也可以用 WinRAR 等解压工具将 DOCX  文件解压得到imageXX 文件,但XX是按图片加入文档先后顺序编排的数字。
如果不知道(一般可能都不知道吧)加入的顺序,可以按图片在文档中的顺序复制到一个新的 DOCX  文件中,然后解压,得到的imageXX 文件顺序与在文档中的顺序一致了,再改名就很方便了。
 在原文件中读出图片到粘贴板
mrange.select
mrange.Copy

复制到新文件中。
 newdoc.Paste

[此贴子已经被作者于2020-1-10 18:23编辑过]


dBase有人接盘了。
2020-01-10 13:21
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:309
帖 子:7944
专家分:35388
注 册:2014-5-20
收藏(1)
得分:7 
oWord = CREATEOBJECT("Word.Application")
oWord.Documents.Open("C:\TEMP\3333.docx")
FOR i=1 TO oWord.ActiveDocument.InlineShapes.Count
    oWord.ActiveDocument.InlineShapes[i].Range.CopyAsPicture &&将图片放到剪贴板
    接下来可以进行粘贴处理或将剪贴板的内容保存到文件
ENDFOR

3333.docx是一个压缩包文件,可用WinRAR解压,图片文件存放路径是 3333.docx\word\media
2020-01-10 22:05
donotspam
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:96
专家分:109
注 册:2016-2-28
收藏
得分:7 
很好!
2020-01-11 00:46
预言家
Rank: 1
等 级:新手上路
威 望:2
帖 子:21
专家分:0
注 册:2019-12-20
收藏
得分:0 
回复 3楼 吹水佬
已经成功,就是你这句代码起作用了,以前我在网上找了一个程序代码,就是一直不能把全部图片另存出来。
oWord.ActiveDocument.InlineShapes[i].Range.CopyAsPicture &&将图片放到剪贴板
挺久了才看到哈,感谢了
2021-02-01 16:45
预言家
Rank: 1
等 级:新手上路
威 望:2
帖 子:21
专家分:0
注 册:2019-12-20
收藏
得分:0 
47Word内的图片保存问题(已解决).zip (539.64 KB)
   这个是已经成功的代码,以后肯定还有人需要的
2021-02-01 16:48
预言家
Rank: 1
等 级:新手上路
威 望:2
帖 子:21
专家分:0
注 册:2019-12-20
收藏
得分:0 
回复 3楼 吹水佬
提示: 该帖被管理员或版主屏蔽
2021-02-01 16:57
预言家
Rank: 1
等 级:新手上路
威 望:2
帖 子:21
专家分:0
注 册:2019-12-20
收藏
得分:0 
回复 2楼 xuminxz
你的思路我没有尝试哈,楼下吹水佬解决了问题,我附到有源码和实验数据,你有兴趣可以试试
2021-02-01 16:59
预言家
Rank: 1
等 级:新手上路
威 望:2
帖 子:21
专家分:0
注 册:2019-12-20
收藏
得分:0 
回复 5楼 预言家
有个两千多人的VFP群,经常讨论一些VFP的问题,请你加入一下哇?9,1,4,5,3,9,6,1,3  这个截图是二群[attach]103258[/attach]
2021-02-01 17:15
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:254
帖 子:8869
专家分:23013
注 册:2012-2-5
收藏
得分:0 
以下是引用预言家在2021-2-1 17:15:41的发言:

有个两千多人的VFP群,经常讨论一些VFP的问题,请你加入一下哇?9,1,4,5,3,9,6,1,3  这个截图是二群

那你为什么还要在论坛发帖解决问题啊

坚守VFP最后的阵地
2021-02-01 17:43
快速回复:Word文档中固定模板的表格中的图片另存为文件的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.063961 second(s), 9 queries.
Copyright©2004-2021, BCCN.NET, All Rights Reserved