【付费￥80】【已完成】求助word VBA程序，根据word文字，批量搜索文件夹下图片插入

snow653124 · 发表于 2021-9-26 10:26

本帖最后由 snow653124 于 2021-9-26 19:35 编辑

付费求助￥80

现状：
   文件的部分图片，需要从不同的渠道汇总，每个图片下还要有改图片的描述。一个一个粘贴插入太费工，故有此一求。
文档中有部分已粘贴的图片及图片的描述，有只有文字无图片的。
求：
   一次性批量搜索文档中的文字，如果文字上方有图片，则略过此行文字，搜索下一行。如果本行图片上方无图片，则搜索选定或者指定或者特定的文件夹下，选择同名的图片，插入该行文字上方，然后继续下一行操作。此处有2个思路，一个是逐行文字搜索，一种就是跳跃的（文字上方有图片），这两种都可以。
   我给出示例，还请帮忙。
QQ截图20210926102353.png

   如上图
   湖面、九曲、落日、碎石山上方无图片，则需要搜索文件夹插入同名图片。11、12、3、14上方有图片，则略过（有可能文字与图片不在同页）
   我把素材打包发上。

VBA代码.zip (1.4 MB, 下载次数: 6)

Moneky · 发表于 2021-9-26 10:35

没有人接招的话请联系我

snow653124 · 发表于 2021-9-26 11:13

Moneky 发表于 2021-9-26 10:35
没有人接招的话请联系我

有2个刚才加好友的，还没不知道
等下午还没信的话，联系您如何？

Moneky · 发表于 2021-9-26 11:21

本帖最后由 Moneky 于 2021-9-26 11:22 编辑

已经OK了，支持自定义图片多扩展名

snow653124 · 发表于 2021-9-26 12:16

Moneky 发表于 2021-9-26 11:21
已经OK了，支持自定义图片多扩展名

谢谢，我加你QQ好友

Moneky · 发表于 2021-9-26 12:19

本帖最后由 Moneky 于 2021-9-26 13:20 编辑

snow653124 发表于 2021-9-26 12:16
谢谢，我加你QQ好友

QQ联系了，看到回复一下Q即可。
后记：已交付完成

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

[求助] 【付费￥80】【已完成】求助word VBA程序，根据word文字，批量搜索文件夹下图片插入

最新热点 /1