跳到主要内容

插入图片

命令说明

在工作表中插入图片,如指定图片名称存在,则替换已存在图片

命令原型

Excel.InsertImage(objExcelWorkBook,sheet,sFilePath,sName,fLeft,fTop,fWidth,fHeight)

命令参数

参数必选类型默认值说明
objExcelWorkBookTrueexpressionobjExcelWorkBook使用 "打开Excel工作簿"命令(Excel.OpenExcel) 或 "绑定Excel工作簿" 命令(Excel.BindBook)返回的工作簿对象
sheetTruestring"Sheet1"如果使用字符串,则表示指定工作表的名字;使用数字,则表示指定工作表的顺序(从0开始)
sFilePathTruepath'''C:\Users'''要插入的图片文件路径
sNameTruestring""默认值为空字符串,由Excel自动编排。如需删除或者更新相应图片,建议修改名字
fLeftTrueexpression0图片距离左边的边距
fTopTrueexpression0图片距离顶部的边距
fWidthTrueexpression100图片的宽度,按原图的百分比计算
fHeightTrueexpression100图片的高度,按原图的百分比计算

运行实例

/*********************************插入图片***************************************
命令原型:
Excel.InsertImage(objExcelWorkBook,"Sheet1",'''C:\Users''',"",0,0,100,100)
入参:
objExcelWorkBook--Excel工作簿对象(使用 "打开Excel"命令(Excel.OpenExcel) 打开的工作簿或使用"绑定Excel"命令(Excel.BindBook)绑定的工作簿对象)。
sheet--如果使用字符串,则表示指定工作表的名字;使用数字,则表示指定工作表的顺序(从0开始)。
sFilePath--要插入的图片文件路径。
sName--默认值为空字符串,由Excel自动编排。如需删除或者更新相应图片,建议修改名字。
fLeft--图片距离左边的边距。
fTop--图片距离顶部的边距。
fWidth--图片的宽度,按原图的百分比计算。
fHeight--图片的高度,按原图的百分比计算。
注意事项:
该命令不能单独使用,需配合 "打开Excel"命令(Excel.OpenExcel) 或"绑定Excel"命令(Excel.BindBook)一起使用才能正常使用,单独使用则会报错。
**********************************************************************************/
Dim objExcelWorkBook = ""
objExcelWorkBook = Excel.OpenExcel(@res"测试.xlsx",True,"Excel","","")
Excel.InsertImage(objExcelWorkBook,"Sheet1",@res"示例图片.png","示例",0,0,100,100)
TracePrint "插入图片:Excel对象Sheet1工作表插入一张图片命名为'示例'"
Excel.CloseExcel(objExcelWorkBook,True)

可视化样例