vba - VBA：内容控制；图片的文件名

Question

我对 VBA 比较陌生，并试图在几个 Word 文档中自动插入图片。所以在Word文档中我做了一个图片内容控件。我给这个内容控件命名为“insert_pict”。现在在我的宏中，我该如何添加

到目前为止我有这个代码：

Sub picturecc()

Dim Word_path As String
Dim Imagelocation As String
Word_path = "template.docm"
Imagelocation = "C:\Users\XXX\Desktop\Picture1.png"
Documents(Word_path).Activate
With ActiveDocument
    .SelectContentControlsByTitle("insert_pict")(1).Range.InlineShape.AddPicture (Imagelocation)
End With

End Sub

但是我在 .SelectContentControlsByTitle("insert_pict")(1).Range.InlineShape.AddPicture (Imagelocation) 行中收到错误“找不到方法或数据成员”。将图片添加到内容控件的正确方法是什么？谁能帮我完成这项工作？非常感谢。

Answer 1

利用：

With ActiveDocument
    .InlineShapes.AddPicture Imagelocation, , , .SelectContentControlsByTitle("insert_pict")(1).Range
End With