您的位置:程序门 -> vb -> 数据库(包含打印,安装,报表)



关于excel中插入图片的问题


[收藏此页] [打印本页]选择字色:背景色:字体:[][][]


关于excel中插入图片的问题
发表于:2008-01-12 10:58:16 楼主
        本人现在使用vb编程,想在excel中输出我刚刚生成的图片。使用如下语句
vbsheet.range("a1:g1").select
vbsheet.pictures.insert   (text6.text)
text6.text中的内容为图片路径,程序在运行时会提示“类pictures的insert方法无效”
请问要怎么样才能插入图片啊,路径都是正确的。把text6.text改为“c:/11.bmp”,就能正常运行。
请各位大侠帮忙啊。有点急啊。不胜感激!
发表于:2008-01-12 15:19:531楼 得分:0
你把text6.text赋给一个变量.然后在试试
比如工a=text6.text
vbsheet.pictures.insert       (a)   这样呢?如果不行在vbsheet.pictures.insert       trim(a)   试试呗..
发表于:2008-01-12 16:04:092楼 得分:0
text6.text   =trim(text6.text)
if   dir(a,   vbdirectory)   <>   ""   then
        activesheet.pictures.insert(text6.text).select
end     if
发表于:2008-01-12 16:07:283楼 得分:0
试试可以不我没有试
text6.text       =trim(text6.text)  
if       dir(text6.text,       vbdirectory)       <>       ""       then  
                activesheet.pictures.insert(text6.text).select  
end     if


快速检索

最新资讯
热门点击