求AU3 操作EXCEL VBA 使用 ActiveSheet.Shapes.AddPicture 插入图片方法[已解决]

kk_lee69

求AU3 操作EXCEL VBA 使用 ActiveSheet.Shapes.AddPicture 插入圖片方法

kevinch

这样试下

ActiveSheet.Shapes.AddPicture "D:\test.png", 0, 1, 1, 1, 100, 100

说明参考下面帮助内容

Shapes.AddPicture 方法
现有文件创建图片。返回一个代表新图片的 Shape 对象。
语法

表达式.AddPicture(Filename, LinkToFile, SaveWithDocument, Left, Top, Width, Height)

表达式   一个代表 Shapes 对象的变量。

参数

名称 必选/可选 数据类型 说明
Filename 必选 String 要在其中创建 OLE 对象的文件。
LinkToFile 必选 MsoTriState 要链接至的文件。
SaveWithDocument 必选 MsoTriState 将图片与文档一起保存。
Left 必选 Single 图片左上角相对于文档左上角的位置（以磅为单位）。
Top 必选 Single 图片左上角相对于文档顶部的位置（以磅为单位）。
Width 必选 Single 图片的宽度（以磅为单位）。
Height 必选 Single 图片的高度（以磅为单位）。

返回值
Shape

说明


MsoTriState 可以是下列 MsoTriState 常量之一。
msoCTrue
msoFalse 使图片成为其源文件的独立副本。
msoTriStateMixed
msoTriStateToggle
msoTrue 建立图片与其源文件之间的链接。

MsoTriState 可以是下列 MsoTriState 常量之一。
msoCTrue
msoFalse 在文档中只存储链接信息。
msoTriStateMixed
msoTriStateToggle
msoTrue 将链接图片与该图片插入的文档一起保存。如果 LinkToFile 为 msoFalse，则该参数必须为 msoTrue。


示例


本示例向 myDocument 中添加由文件“Music.bmp”创建的图片。插入的图片链接到创建该图片的文件，并与 myDocument 一起保存。

Visual Basic for Applications
Set myDocument = Worksheets(1)
myDocument.Shapes.AddPicture _
    "c:\microsoft office\clipart\music.bmp", _
    True, True, 100, 100, 70, 70

kk_lee69

回复 2# kevinch

理解  我昨天了解的方法也是這樣  只是怎麼測試 都不行

然後剛剛怎麼測試 都可以  真怪  謝啦!!