0

我正在尝试在 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
#

谢谢!

4

1 回答 1

0

你通过 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

wdRelativeHorizontalPositionPagewdRelativeVerticalPositionPage说坐标相对于当前页面的左侧和顶部。然后 .left 指定距页面左边缘的英寸数, .Top 是距顶部的英寸数。

这些MSDN 页面上讨论了您可以在形状上调用的所有可用成员

于 2014-09-05T07:26:18.410 回答