从现有文件创建图片。 返回一个 Shape 对象,该对象表示新的图片。
语法
expression。 AddPicture( _FileName_, _LinkToFile_, _SaveWithDocument_, _Left_, _Top_, _Width_, _Height_ )
expression:一个表示 Shapes 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| FileName | 必需 | String | 要在其中创建 OLE 对象的文件。 |
| LinkToFile | 必需 | MsoTriState | 确定是否将图片链接到从中创建该图片的文件。 |
| SaveWithDocument | 必需 | MsoTriState | 确定是否将已链接的图片插入到文档一起保存。 如果为 msoFalse 时链接到文件,则此参数必须是 属性值为 msoTrue 。 |
| Left | 必需 | Single | 图片左边缘相对于幻灯片左边缘的位置(以磅为单位)。 |
| Top | 必需 | Single | 图片上边缘相对于幻灯片上边缘的位置(以磅为单位)。 |
| Width | 可选 | Single | 图片的宽度(以磅为单位)。 |
| Height | 可选 | Single | 图片的高度(以磅为单位)。 |
返回值
型号
示例
本示例向 myDocument 中添加由文件"Music.bmp"创建的图片。 插入的图片链接到创建该图片的文件,并与 myDocument 一起保存。
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddPicture FileName:="c:\microsoft office\" & _
"clipart\music.bmp", LinkToFile:=msoTrue, SaveWithDocument:=msoTrue, _
Left:=100, Top:=100, Width:=70, Height:=70
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。