这种EXCEL的功能是怎么实现的? 最近看了一个软件,他的报表全是用EXCEL做的,就是软件目录下做了很多EXCEL文件,现在我感到奇怪的是他的文件中:单元格显示#NAME?,而点上去,上部又显示:=ADOQuery2_公司名称,这是怎么实现的?是不是数据库字段呀,可以直接将ADOQUERY查询内容导到此文件形成报表吗? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 读、取excel中记录的过程需要调用两个单元文件Excel2000,ComObj(当然Excel的单元文件看版本来定),如果是存储在容器中那么还需要用到OleServer,我这样取过一次:先设两个变体类型的变量:ExcelApp,ExcelSheet : Variant;主程序中可以通过opendialog来选取Excel文件,然后创建 ExcelApp:=CreateOleObject('Excel.Application'); Excelapp.WorkBooks.Open(opendialog1.FileName);这样就可以将你查询到的结果集写入: ExcelApp.WorkSheets[Excel表的页].cells[Excel表的行,Excel表的列] := 查询结果;如果很多记录可以循环来实现。 DBGRID转颜色及记录转颜色行数 timer控件! 数据库中datetime类型的数据,sql查询求助 闲聊:不用其他变量,交换整型变量A,B,方法探讨 DELPHI中的图表控件CHART的使用问题 怎样在DBGRID相对应的字段中嵌入如下的控件 dbcombobox1 DBLookUpComboBox DBmemo,只要提代码都给分 请教各位大大,如何根据数据库记录,画组织结构图。 下面代码错在哪里? 怎么去掉API﹕GetSystemDirectory的Buffer中的無用字符? 安全加密请教各位打下 找熟悉delphi的人一起合作开发项目 打印的问题
先设两个变体类型的变量:ExcelApp,ExcelSheet : Variant;
主程序中可以通过opendialog来选取Excel文件,然后创建
ExcelApp:=CreateOleObject('Excel.Application');
Excelapp.WorkBooks.Open(opendialog1.FileName);
这样就可以将你查询到的结果集写入:
ExcelApp.WorkSheets[Excel表的页].cells[Excel表的行,Excel表的列] := 查询结果;
如果很多记录可以循环来实现。