您的位置:程序门 -> vb -> 基础类



烦恼阿,excel导入导出问题


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


烦恼阿,excel导入导出问题
发表于:2007-09-26 12:04:47 楼主
option   explicit
dim   a(1   to   100)   as   string,pn   as   long

private   sub   form_load()
pn   =   0
open   app.path   +   "\aaa.xls "   for   input   as   #1
while   not   eof(1)
pn   =   pn   +   1
line   input   #1,   a(pn)
wend
close
end   sub

想打开一个excel(5列,行数不限),去掉前三行后,复制到aaa.xls中
应该怎么写

然后再把数组a(i)里的数据导出到另外一个excel
应该怎么写
发表于:2007-09-26 12:37:071楼 得分:0
................
发表于:2007-09-26 14:05:322楼 得分:0
不好意思
本人初学
复制了很多源码下来改都没改对
请高手们帮忙
发表于:2007-09-27 15:10:213楼 得分:0
这个..一般是不是用   oldebd   做的吧
发表于:2007-09-30 01:13:584楼 得分:0
这样好象不可以哦...
应该创建一个object对象...在进行你的操作...


快速检索

最新资讯
热门点击