如何解决MS Word - 将文本设置为图像标题
我有一个包含多张图片的文档。
在我通过 VBA 添加的每张图片下,都有一个标题,如“Fig.XX” 在这个标题下,我有一个短语应该是这张图片的标题描述。
我现在的问题是如何将标题下的文本放入占位符中? enter image description here
解决方法
例如:
Sub Demo()
Application.ScreenUpdating = False
With ActiveDocument.Range
With .Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "<<Placeholder>>^p"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindStop
.Format = True
.Style = wdStyleCaption
End With
Do While .Find.Execute
.Text = vbNullString
.Style = wdStyleCaption
.Collapse wdCollapseEnd
Loop
End With
Application.ScreenUpdating = True
End Sub
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。