㈠ word 图片中已经插有很多图片 想用宏给每张图插入题注 如Photo X 这个宏该怎么编写
Sub宏1()
CaptionLabels.AddName:="Photo"
ForEachilsInActiveDocument.InlineShapes
ils.Select
Selection.InsertCaptionLabel:="Photo",TitleAutoText:="InsertCaption1",_
Title:="",Position:=wdCaptionPositionAbove,ExcludeLabel:=0
Nextils
EndSub
这个只能对“嵌入式”图片添加题注。
如果是“环绕形”等排版的图片,虽然也可以用另外的代码自动添加题注,但题注的位置无法跟随图片,解决起来比较麻烦。
㈡ word如何将插入图片名自动作为图片标注
我们有个文件夹,里面是图片,每个图片都 有名称;如果在word中批量插入图片,如何让现有的图片名称成为word里的图片标题呢?
首先,我们打开一个word文本(
㈢ WORD怎样制作宏插入图片,图片上面需要带图片名字,谢谢。越详细越好。
给你一条思路吧。
1、打开word文件,用录制宏录一段插入图片的代码(这里注意代码的路径和图片名);再录一段保存文件到A目录的代码。备用;
2、新建一个excel文件,将你文件夹里需要建文件的人名全部列到excel的某一列中;
3、参照1的代码在excel里写vba代码,循环执行这些人名,每个人名都有新建、插入图片、保存这个过程。