哪位高手做过PB与EXCEL互相传数据的程序？

[dzbswl]

我有问题请教,问题解决了送500分

[trouble]

说！

[dzbswl]

1。在用PB取EXCEL单元格中的值时，取出的只有前两个字，这是为什么？

[「已注销」]

我只用过cell

[dzbswl]

等待中--------

[dotnba]

学习

[水煮蛙]

i will try my best to do it !

[longzzh]

简单的只要用saveas()即可

[summy_lee]

你是不是使用pb 6.5的ole方式?
如果是，换pb8.0试试.

[dzbswl]

nana11(nana11)　
你好：
DDE我没有用过，有点晕，可以就我的问题 给讲讲吗？
我是pb 6.5的 oleobject ole_excel
if not isvalid(ole_excel) then
ole_excel=create oleobject
li_ret=ole_excel.connecttoobject( "excel.application")
if li_ret<>0 then
//如果excel没有打开，则建立新的应用
li_ret=ole_excel.connecttonewobject("excel.application")
if li_ret<>0 then
MessageBox("OLE错误","OLE无法连接! 错误号"+string(li_ret))
return 1
end if
end if

我想在用户保存EXCEL时，从EXCEL中取出数据，可我用循环EXCEL的每个单元格方法，取ole_excel(x,y).value,取出的值中有前两个字是完整的(对中文，而英文字母就不是了)
你说是不是在PB中取EXCEL中的中文需要一个什么转换啊？
还用，基于我上面的思路，用DDE要怎么实现我，请帮忙

[dzbswl]

我真诚地希望有这方面经验的人来帮帮我，我一百二十分地表示感谢

[Hanson_bati_zhu]

试试用剪贴板
从EXCEL中把当前用户选择区域或所有区域COPY到剪贴板中
在PB中分析剪贴板中数据，用ImportClipboard导入到DW中

[dzbswl]

Hanson_bati_zhu(Hanson_bati_zhu)　
感谢你的参与
如果EXCEL中存在用户随便写上去的文本也可以导入到DW中吗？我试试

[summy_lee]

我以前遇到，6.5对中文支持有点问题，换8.0后一切正常。
我至今没有方法解决，如果哪位高手知道，望告知。

[dzbswl]

希望结交一些对这方面问题研究过和感兴趣的朋友
QQ：58558665

[nana11]

使用DDE，可以完成对excel的单元格的操作

[nana11]

handle=OpenChannel("Excel"," test.xls ")
SetRemote("r"＋string(I＋1)＋"c1",string(dw_1.getitemnumber(I＋1)),handle)
ExecRemote("[print()]","Excel","grade1.xls")
ExecRemote("[close(false)]","Excel","grade1.xls")
ExecRemote("[quit()]","Excel","system")

[Flat]

有人懂吗 很多兄弟也很想知道也。。。