Image word 2013宏添加和;编辑图片

Image word 2013宏添加和;编辑图片,image,macros,word-2013,Image,Macros,Word 2013,我试图在word 2013中创建一个宏。我的目的是将图片添加到当前页面,然后设置其大小和位置。 我的问题是,我无法设置它的布局选项:我希望它“在文本后面”和“在页面上固定位置” 这是我的代码: Sub myMacro() Set bla = ActiveDocument.Shapes.AddPicture _ (FileName:="\\\image_path///", _ LinkToFile:=False, _ SaveWithDocument:=True,

我试图在word 2013中创建一个宏。我的目的是将图片添加到当前页面,然后设置其大小和位置。 我的问题是,我无法设置它的布局选项:我希望它“在文本后面”和“在页面上固定位置”

这是我的代码:

Sub myMacro()
    Set bla = ActiveDocument.Shapes.AddPicture _
    (FileName:="\\\image_path///", _
    LinkToFile:=False, _
    SaveWithDocument:=True, _
    Left:=28.34, _
    Top:=500, _
    Width:=107, _
    Height:=107)
End Sub
# #
谢谢

你可以通过bla来完成。调用ActiveDocument.Shapes.AddPicture时,它将返回一个形状对象。在您的情况下,您将其传递给blah并忽略它

要将形状设置为在后面包裹,可以在创建blah后执行此操作:

With bla
    .WrapFormat.Type = wdWrapBehind
    .RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
    .RelativeVerticalPosition = wdRelativeVerticalPositionPage
    .Left = InchesToPoints(3.0)
    .Top = InchesToPoints(4.2)
End With
wdRelativeHorizontalPositionPage
wdRelativeVerticalPositionPage
表示坐标相对于当前页面的左侧和顶部。然后.left指定距页面左边缘的英寸,Top是距顶部的英寸数

您可以在形状上调用的所有可用成员都将在下面的讨论中讨论