Shapes.AddPicture 方法 (Word)

在文档中添加一幅图片。 返回一个 Shape 对象，该对象代表图片并将其添加到 Shapes 集合。

语法

表达式。AddPicture (FileName、 LinkToFile、 SaveWithDocument、 Left、 Top、 Width、 Height、 Anchor)

expression 是必需的。 一个代表 Shapes 对象的变量。

参数

名称	必需/可选	数据类型	说明
FileName	必需	String	图片的路径和文件名。
LinkToFile	可选	Variant	真 要将图片链接到创建它的文件。 False 使图片文件的独立副本。 默认值为 False 。
SaveWithDocument	可选	Variant	真 要随文档一起保存的链接的图片。 默认值为 False 。
Left	可选	Variant	新图片的左边缘相对于绘图画布的位置，以磅为单位。
Top	可选	Variant	新图片的上边缘相对于绘图画布的位置，以磅为单位。
Width	可选	Variant	图片的宽度，以磅为单位。
Height	可选	Variant	图片的高度，以磅为单位。
Anchor	可选	区域	文档中的 Range。

返回值

型号

示例

以下示例在活动文档中新创建的绘图画布上添加一幅图片。

Sub NewCanvasPicture() 
 Dim shpCanvas As Shape 
 
 'Add a drawing canvas to the active document 
 Set shpCanvas = ActiveDocument.Shapes _ 
 .AddCanvas(Left:=100, Top:=75, _ 
 Width:=200, Height:=300) 
 
 'Add a graphic to the drawing canvas 
 shpCanvas.CanvasItems.AddPicture _ 
 FileName:="C:\Program Files\Microsoft Office\" & _ 
 "Office\Bitmaps\Styles\stone.bmp", _ 
 LinkToFile:=False, SaveWithDocument:=True 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。