office办公软件word如何批量加图名
用word怎么添加图名
1、首先打开Word,选中需要添加图名的图片,如图所示
2、右键点击图片,然后选择“插入题注”功能
3、在弹出的窗口中对题注的各项参数进行设置,如图所示
4、点击确认后,就成功添加了题注了,此时在输入框中输入任意图名即可
怎么量把图片放到WORD里并附上该图的名称Su选择重命名文件夹()
Application.ScreenUpdating=False
WitApplication.FileDialog(msoFileDialogFolderPicker)'运行后出现标准的选择文件夹对话框
If.SowTenmyPat=.SelectedItems(1)ElseExitSu'如选中则返回=-1/取消未选则返回=0
EndWit
IfRigt(myPat,1)<>""TenmyPat=myPat&""
'返回的是选中目标文件夹的绝对路径,但除了本地C盘、D盘会以"C:"形式返回外,其余路
径无""需要自己添加
Getfd(myPat)
Application.ScreenUpdating=True
EndSu
SuGetfd(ByValpt)
OnErrorResumeNext
DimstrPatAsString
'插入两行
Columns("A:B").Select
Selection.InsertSift:=xlToRigt,CopyOrigin:=xlFormatFromLeftOrAove
'设置B行内容
Range("B1")="目标名称"
Range("B2").Select
ActiveCell.FormulaR1C1="=RC[1]&""""&RC[2]&"".JPG"""'设置B行内容为目标名称
Range("B2").Select
m=Range("C65536").End(xlUp).Row
Selection.AutoFillDestination:=Range("B2:B"&m)'填充B行
'设置A行内容为所选文件下所有图谱名称
Range("A1")="原名称"
strPat=pt&"\"
f=Dir(strPat&"*.jpg")
k=1
DoWilef<>""
k=k+1
Range("A"&k)=f
f=Dir
Loop
'调整AB列宽
Cells.Select
Cells.EntireColumn.AutoFit'调整AB列宽
'重命名
a=Cells(Cells.Rows.Count,1).End(xlUp).Row+3'A列最后可见单元的行号
For=2Toa
c=Range("a"&).Value
cc=Range(""&).Value
NamestrPat&cAsstrPat&cc'重命名
Next
MsgBox("重命名完成")
EndSu
word中怎样在图片下方添加图片名称1、首先插入图片在文档中点击菜单栏中的插入,图片,此设备,按钮,选择一张图片。
2、其次输入图名在图片后面回车,另起一行直接输入图片的名字。
3、最后设置图名格式选中图名,右键选择居中即可。
word中如何快速添加图注工具/材料
Word软件
首先,请大家打开Word软件,点击页面顶部的“插入”菜单选项,选择“插入-图片”按钮,选择要插入的图片并点击插入到Word文档中。
图片文件插入到Word文件中之后,对图片文件击右键,选择“插入题注”选项。
接下来,在弹出的对话框中,我们点击选择“新建标签”选项。
这里我们输入自己想展示的标签内容,然后点击“确定”按钮。
接下来,如果标签确定之后,软件在插入图片之后将会为我们自动添加编号,我们点击“确定”按钮即可。
最后,我们在刚才插入图片的下方即可看到刚才设置好的图注了。
word文档里插入很多图,怎么在图上标“图1”、“图2”?为图片添加自动题注x0a1)为图片添加题注,先在文件适当的位置插入图片,然后选中图片,单击右键,执行弹出菜单中的“题注”x0a2)在弹出的窗口中,看看标签选项的下拉菜单中是否有合适的,如果没有,那就点击“新建标签”按钮,在新打开的窗口中新建一个标签“图”,后面的数字Word会自动生成x0a3)如果点击“编号”,还可以设置编号的格式