关于excel中插入图片的问题

[jimmypcc]

本人现在使用vb编程，想在excel中输出我刚刚生成的图片。使用如下语句
vbsheet.Range("a1:g1").Select
vbsheet.Pictures.Insert (Text6.Text)
text6.text中的内容为图片路径，程序在运行时会提示“类pictures的insert方法无效”
请问要怎么样才能插入图片啊，路径都是正确的。把text6.text改为“C:/11.bmp”，就能正常运行。
请各位大侠帮忙啊。有点急啊。不胜感激！

[caofusheng]

Text6.Text =trim（Text6.Text）
If Dir(Text6.Text, vbDirectory) <> "" Then
ActiveSheet.Pictures.Insert(Text6.Text).Select
End If

[UltraBejing]

等待牛人来答.