如何操作Excel文件?

oceanaut 西安交通大学 项目总监  2005-09-14 04:45:20

逐行读取Input.xls数据,并写入到window中的sle_1……sle_20,经过处理后,再把sle_1……sle_20的数据
逐行写回Output.xls文件,并且该文件有两个sheet,一个是读取的Input.xls数据,一个是输出的Output.xls数
据。是读取一行处理一行,然后将处理的这行数据写到Output.xls,即:

……读取input.xls第一行数据并显示到window中的sle_1……sle_20,经过处理后,将window中的sle_1……sle_20
的数据输出到Output.xls
……
一直到最后一行……
...全文
386 点赞 收藏 14
写回复
14 条回复
hangzhou6274 2005年09月27日
很简单的,你搜索一下就有了
建议你去看看VBA变成,就是EXCEL和WORD的宏功能,帮助也很详细.
回复 点赞
PHDYCN 2005年09月26日
原来做过操作EXCEL的,你可以在这个版的已解决问题中搜索一下,肯定能搜索到操作EXCEL的代码
回复 点赞
xb8254 2005年09月23日
我只会从数据窗口往外倒到excel里,不会往里道!无能为力!
回复 点赞
oceanaut 2005年09月19日
问题:读取一个input.xls文件,再通过调用dll文件对读入的数据进行计算,然后将计算结果输出到OutPut.xls文件。有什么好的办法可以解决?请予以说明或者给些代码,谢谢!!!
回复 点赞
oceanaut 2005年09月19日
大家都很忙么?
回复 点赞
oceanaut 2005年09月16日
Window界面:
---------------------------
LA LB LC LD
---------------------------
AA -- -- -- --
BB -- -- -- --
CC -- -- -- --
DD -- -- -- --
EE -- -- -- --
FF -- -- -- --
---------------------------
上面的"--"是将input.xls中的数据经过处理后,写入的数据。每次显示一条数据;每显示一条数据,就向Output.xls文件中写一条数据。转换完毕后,也就向Output.xls写所有数据完毕。

input.xls中的数据是不固定;

**窗口不连接数据库,只是从Excel文件Input.xls中读取数据,经过处理后,把处理后的数据逐行写入输出的Excel文件Output.xls中。

**不知道有什么最简单的方法能实现该功能。
回复 点赞
oceanaut 2005年09月15日
如果Input.xls中有n多条数据,我想用一个循环来处理,每处理一条就要向Output.xls中写一条。但是我能把Input.xls中的数据取出来,但是没有写进去,请帮忙啊?十万火急啊?
回复 点赞
xb8254 2005年09月15日
磅你顶顶,我也想知道答案!
回复 点赞
WorldMobile 2005年09月15日
把你的代码贴出来,帮你看看
回复 点赞
yl_yz 2005年09月14日
OLEObject ole1
ole1= CREATE OLEObject
ole1.ConnectTonewObject("Excel.application")
ole1.workbooks.open(Input.xls)//Input.xls需加路径
ole1.visible = true
//获取EXCEL单元格数据
sle_1.text= ole1.application.activeworkbook.worksheets(1).cells(1,1).value
...

//处理后再写回excel
ole1.application.activeworkbook.worksheets(2).cells(1,1).value=sle_1.text
...

ole1.activeworkbook.close(false)
ole1.Application.quit
ole1.DisconnectObject()
DESTROY ole1
回复 点赞
saiche05 2005年09月14日
ing
回复 点赞
oceanaut 2005年09月14日
这些代码是处理excel文件获得数据吗?关键是没有数据窗,不连接数据库。就一个单一的Window和Excel文件
回复 点赞
workhand 2005年09月14日
处理后再写回去没试验,不过应该也差不多吧,看看帮助
回复 点赞
workhand 2005年09月14日
今天学来的,试试:
OLEObject ole1
从excel文件获得数据

ole1= CREATE OLEObject
ole1.ConnectTonewObject("Excel.application")
//选择要导入数据的EXCEL文件
ll_rtn = getfileopenname('打开文件',ls_pathname,ls_filename,'XLS','EXCEL文件(*.xls),*.xls')

ole1.workbooks.open(ls_pathname,0,0)
ole1.visible = true
//获取EXCEL单元格数据
ls_cell = ole1.workbooks[1].worksheets[1].cells(ll_rowno,ll_colno).value
回复 点赞
发动态
发帖子
控件与界面
创建于2007-09-28

425

社区成员

1.2w+

社区内容

PowerBuilder 控件与界面
社区公告
暂无公告