Word 2013 宏添加和编辑图片

Question

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

这是我的代码：

#

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

#

谢谢！

Answer 1

您可以通过bla来完成。当您调用ActiveDocument.Shapes.AddPicture时，它会返回一个Shape对象。在你的情况下，你把它传递给blah而忽略它。

要设置包裹在后面的形状，你可以在创建blah:后这样做

With bla
    .WrapFormat.Type = wdWrapBehind
    .RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
    .RelativeVerticalPosition = wdRelativeVerticalPositionPage
    .Left = InchesToPoints(3.0)
    .Top = InchesToPoints(4.2)
End With

CCD_ 1和CCD_ 2表示坐标相对于当前页面的左侧和顶部。然后.left指定距页面左边缘的英寸数，.Top是距顶部的英寸数。

您可以调用形状的所有可用成员都在MSDN页面