Delphi5 控制 Excel2000 心得(0分)

  • 主题发起人 主题发起人 sandy suen
  • 开始时间 开始时间
不知有那位大侠可以回答locka的问题,因为我也碰上同样的问题。我想将Excel文件通过
Delphi控制另存为*.csv文件格式。使用的是ExcelApp.saveas,但是系统报错。不知有那
位有这方面的经验,还望不吝赐教。
 
To sandy suen:
补充说明。TExcelApplication 没有SaveAs这一方法。不知sandy suen如何搞定的。
如果可以请将有关成果、经验、心得、相关代码等发给我一份,万分感谢!!
我的邮件地址 shanghai7777@hotmail.com.
 
有没有控制word的方法?我很急需呀!
 
To: adamye
我现在告诉你:

CONST
xlCSV = 6;
VAR
fExcelApp: Variant;
...
fExcelApp := CreateOleObject('Excel.Application');
...
fExcelApp.ActiveWorkbook.SaveAs(theFileName, xlCSV, '', '', False, False);
...
 
非常感谢cxzhu兄。另存问题得以解决。但不知cxzhu兄何以得知xlCSV项的取值为6。若可以
请指点一本参考资料(Dephi的Help的某部分亦可)好让小弟知其然还能知其所以然才好。
再次万分感谢。
 
求教上面的各位大佬:
我要从Excel2000 表中读数据,然后放到数据库中,你们没说该怎样做。
最好是C++builder的办法,没有的话DELPHI也行。
先谢过各位大虾,我急用。
 
太好了,我现在正在找这方面的资料,早上发了个贴子询问这个东西,刚刚回家收信,就有
人告诉我这个贴子了。上来一看,果然经典。
支持。
感谢:sandy suen 整理资料
也感谢作者:吴晓勇,孙唏瑜
 
楼上的,如果我没搞错的话sandy suen 就是孙唏瑜:)
不止那位大虾知道用excelapplication如何在excel里生成一个菜单,然后这个菜单的事件
调用delphi的事件!!
 
[?]
难道大家都不觉得这种方法效率低? 都没有等待的痛苦?
 
请问我想得到excel表格的行数,用了以下语句:
ExcelWorksheet1.Used.Range.Rows.Count;
但编译时报错:
[Error] : '[' expected but '.' found
原因是什麽?请大虾指点!
 
大家看看excel中的vba帮助就行了,方法是:
打开excle,按alt+f11键,就会进入到vba的界面,和vb有点相像,就可以找到帮助了
如果vba的帮助不能打开,说明安装office的时候没有安装vba帮助,因为office典型安装时
不会安装vba帮助的,你可以用office的安装光盘将vba帮助添加进去

实际上delphi和excel连上以后,剩下的都是vba的语句了,
以上对word同样适用,只要熟悉了vba,就能对所有的office产品进行控制

若有什么地方需要小弟效力,请联系 way@263.sina.com
 
excel的菜单(自己添加的)如何调用delphi程序
 
re:excel的菜单(自己添加的)如何调用delphi程序
1.在excel中间一个宏,如:
function test()
shell("c:/windows/notepad.exe")
end

2.在自定义菜单中指定该宏即可
 
各位老大们,能不能看看我的问题呢,怎么解决呢?我愿意出1000分。(:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1167884
 
黄忠伟, >>
宏是在excel中定义的
我要调用的是delphi的程序
譬如,我要调用form2.onshow事件
 
你可以试着在你的delphi程序里面创建一个COM自动化对象,在宏里面可以连接到这个
对象的实例并且调用他的方法,然后在这个方法里面再调用你的form1.onshow或其他
你希望的任何方法。
我没有试过,不过我觉得可以,你试一下吧,各位大虾觉得这样可行吗?
 
flypuma, 可以的,虽然我没试过,友人做过,像pdf好像就是这么做的
还有没有别的方法
 
flypuma, 可以的,虽然我没试过,友人做过,像pdf好像就是这么做的
还有没有别的方法
 
如果不介意,我想顺便问一下这个菜单怎么加?是永久的加上去了呢还是
程序起来才有,程序关掉就消失了?另外在程序里面怎么控制让
这个菜单和一个宏关联上?
谢谢
 

Similar threads

I
回复
0
查看
602
import
I
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
837
DelphiTeacher的专栏
D
后退
顶部