请问如何用delphi在excel里插入一张图片？

Question

ActiveSheet.Pictures.Insert( _
        "C:\Documents and Settings\Administrator\My Documents\My Pictures\0001.jpg").Select;
使用ole对象。

Answer 1

我用上面的语句，提示类pictures的insert方法无效
比如我用下面语句在[i,j]的单元格中写上“相线”两个字
现在如果我想在[i,j]的单元格中插入一张图片，就该用
什么命令？
Sheet1.Cells[i,j] := '相  线';
按你说的方法是不是
Sheet1.pictrues.insert('c:\..\100.bmp').select
但这样会出“类pictures的insert方法无效"的错误！
请指教！

Answer 2

sheet1.cell[i,j].selectsheet1.picture.insert('1.bmp')