PowerPoint VBA教程:AddPicture方法

从现有文件创建图片。返回一个代表新图片的Shape对象。

expression.AddPicture(FileName, LinkToFile, SaveWithDocument, Left, Top, Width, Height)

expression  必选。该表达式返回“应用于”列表中的对象之一。

FileName  必选。String 类型。创建 OLE对象所依据的文件。

LinkToFile  必选。MsoTriState 类型。确定是否将图片链接到创建该图片所依据的文件。

MsoTriState 可以是下列 MsoTriState 类型常数之一。
msoCTrue
msoFalse 将图片制成该文件的一个独立副本。
msoTriStateMixed
msoTriStateToggle
msoTrue 将图片链接到创建该图片所依据的文件。

SaveWithDocument  必选。MsoTriState 类型。确定是否将已链接的图片与其插入到的文档一起保存。如果 LinkToFile 为 msoFalse,则此参数必须为 msoTrue。

MsoTriState 可以是下列 MsoTriState 类型常数之一。
msoCTrue
msoFalse 在文档中只存储链接信息。
msoTriStateMixed
msoTriStateToggle
msoTrue 将链接的图片与其插入到的文档一起保存。

Left  必选。Single 类型。图片左边缘相对于幻灯片左边缘的位置(以磅为单位)。

Top  必选。Single 类型。图片上边缘相对于幻灯片上边缘的位置(以磅为单位)。

Width,  必选。Single 类型。图片的宽度(以磅为单位)。

Height,  必选。Single 类型。图片的高度(以磅为单位)。

VBA示例

本示例在 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

上页:PowerPoint VBA教程:AddPeriods方法 下页:PowerPoint VBA教程:AddPlaceholder方法

PowerPoint VBA教程:AddPicture方法

PowerPoint VBA教程:AddPlaceholder方法 PowerPoint VBA教程:AddPolyline方法
PowerPoint VBA教程:AddShape方法 PowerPoint VBA教程:AddTable方法
PowerPoint VBA教程:AddTextbox方法 PowerPoint VBA教程:AddTextEffect方法
PowerPoint VBA教程:AddTitle方法 PowerPoint VBA教程:AddTitleMaster方法
PowerPoint VBA教程:AddToFavorites方法 PowerPoint VBA教程:Align方法
PowerPoint VBA教程:Apply方法 PowerPoint VBA教程:ApplyTemplate方法
PowerPoint VBA教程:Arrange方法 PowerPoint VBA教程:AutomaticLength方法
PowerPoint VBA教程:Background方法 PowerPoint VBA教程:BeginConnect方法
PowerPoint VBA教程:BeginDisconnect方法 PowerPoint VBA教程:BuildFreeform方法
PowerPoint VBA教程:CanCheckIn方法 PowerPoint VBA教程:CanCheckOut方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号