请问Excel和PB数据交换的问题
我用DDE方式与Excel交换数据，但是只能读取第一个sheet的数据
请问如果我想要得到sheet2的数据应该做什么样的操作，谢谢
问题点数：100、回复次数：14Top
1 楼microhard（Befree）回复于 2003-10-03 18:39:10 得分 0
怎么解决呀，分不够再加！Top
2 楼workhand（我可憨了...）回复于 2003-10-04 11:11:07 得分 100
luo_excel.workbooks.open(ls_path)
luo_sub = luo_excel.application.workbooks(ls_filename).worksheets(2)//222222Top
3 楼microhard（Befree）回复于 2003-10-05 13:47:19 得分 0
能不能再给解释详细一点Top
4 楼workhand（我可憨了...）回复于 2003-10-05 14:55:19 得分 0
我这是用ole来做的，设置当前的sheet页，然后一个cell一个cell地取值，循环。可以取到excel里的数值Top
5 楼ishxb（何绪丙）回复于 2003-10-05 16:21:57 得分 0
同意2楼Top
6 楼nhdj（柳柳荷叶清清水）回复于 2003-10-06 15:44:05 得分 0
我也感觉用oleobject比较好，下面是我用delphi的例子，你参考一下吧
var
x,sheet:variant;
str:string;
begin
try
x:=createoleobject('excel.application');
except
messagedlg('不能打开Mircrosoft Excel'+#13+'请检查是否已经安装 Mircrosoft Office!',mterror,[mbok],0);
abort;
end;
x.workbooks.add('\平衡表.xls');
sheet:=x.workbooks[wbk].worksheets['平衡表']; //决定当前的sheet
sheet.cells[1,1]:='123';
sheet.cells[1,2]:='456';
str=sheet.cells[1,2]; //exel的表取出来的数都是字符串类型的
sheet.saveas('平衡表.xls');
//显示excel
x.visible = true;
//关闭excel
x.quit;
Top
7 楼workhand（我可憨了...）回复于 2003-10-06 17:08:49 得分 0
问题解决了吗Top
8 楼ishxb（何绪丙）回复于 2003-10-06 19:06:30 得分 0
友情帮顶Top
9 楼microhard（Befree）回复于 2003-10-06 20:09:17 得分 0
to workhand(我是醒着的.....)
我用PB7.0和EXCEL 2000在win2000pro 下，就是不能读取中文字符串
这是不是和Unicode编码有关？？？
还是EXCEL的OLE有问题
还是PB对中文支持不好，pb8,pb9是不是也有类似的问题
Top
10 楼mmjhcg（两岸有花）回复于 2003-10-06 23:06:20 得分 0
我现在正在用pb8.03操作access2000和excel2000之间数据交换没有什么事呀,Top
11 楼hdyes（我是流氓，我怕谁，你是流氓，谁怕你）回复于 2003-10-06 23:19:01 得分 0
用OLE！Top
12 楼microhard（Befree）回复于 2003-10-11 13:17:33 得分 0
upTop
13 楼zyzj216（秋水玲珑寒）回复于 2003-10-11 16:01:12 得分 0
没有这样用过，UPTop
14 楼jdsnhan（柳荫凉）回复于 2003-10-11 16:37:16 得分 0
用ole吧。以前有人作过。Top
