To:wjzhuang(醉里挑灯看剑)

[dufeng3104]

还是刚才那段程序编译通过了但当运行到
newxls=(ex.OleFunction("Workbooks")).OleFunction("Add");
时出现下面的错误：
“找不到成员”
希望能与解决，谢谢！

[wjzhuang]

要下班了,我晚上在看,好吗?

[dufeng3104]

好的，谢谢你！

[wjzhuang]

修改如下：
Variant temp = ex.OlePropertyGet("Workbooks");
newxls = temp.OleFunction("Add");
不过运行到循环里，还会有问题。你参照上面修改看看。

[dufeng3104]

怎样通过Columns和Range来完成，能够说的具体些吗
方便的话给我发来相关的代码好吗
Email:[e-mail]

[wjzhuang]

我试试看,搞定后给你发信.
还有,兄弟,那个...那个...您能不能把这个分给结了?

[dufeng3104]

:),好啊，接分

[wjzhuang]

谢了!

[dufeng3104]

wjzhuang(醉里挑灯看剑)老兄，真是非常谢谢你，程序运行到　
newxls.OleFunction("SaveAs",filename);时
不知为什么出现下面的错误：
“发生意外”
希望能与解决，谢谢！为了表示对你的感谢，我再加20分。

[wjzhuang]

我看看先,你把修改后的这一段的代码发给我,可以吗?
[e-mail]

[dufeng3104]

可以

[wjzhuang]

修改如下:
AnsiString otherfilename = "other.xls";
newxls.OleFunction("SaveAs",otherfilename);
//保存工作薄，filename是工作薄的全文件名
你可以在Excel的默认路径看到该文件
另:你的程序好像没把数据读入?

[dufeng3104]

我也看到数据未读入
不知怎么回事
老兄，帮我诊断诊断

[wjzhuang]

你从Table读取内容,应该先读取Table的字段来设置Excel的表单.
然后在开始从Table读取内容读入到你设置好的Workbooks里
可以通过Columns和Range来完成.
试试看,再联络!

[wjzhuang]

吃饭先!