右栏

搭建论坛 → 《搭建之星》论坛 → 经验交流 → 怎样调用Excel的Application组件，对excel进行操作！


  共有3109人关注过本帖树形打印

主题：怎样调用Excel的Application组件，对excel进行操作！
帅哥哟，离线，有人找我吗？
wbl051
 小大  1楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：设计师 帖子：500 积分：3508 威望：0 精华：0 注册：2008-3-8 10:23:03 		怎样调用Excel的Application组件，对excel进行操作！  发帖心情 Post By：2012-3-25 20:03:11

Excel报表的生成与打印 
这里采用了Excel的Application组件，该组件在安装Excel时安装到系统中。我们的操作也都是针对该组件。 
(1) 建立Excel.Application对象 
set objExcel=CreateObject("Excel.Application") 
(2) 打开Excel模板 
objExcel.Workbooks.Open(server.mappath("\test")&"\book1.xlt") '打开Excel模板 
objExcel.Sheets(1).select '选中工作页 
set sheetActive=objExcel.ActiveWorkbook.ActiveSheet 
(3) Excel的常规添加操作 
例如sheetActive.range("g4").value=date() ‘这里添加的是时间，当然也可以是你指定的任何数据 
(4) Excel中添加数据库中的纪录 
这里假设已有一个数据集adoRset，存放由Sql操作生成的统计数据。 
num=7 ‘从Excel的第七行开始 
do until adoRset.EOF ‘循环直至数据集中的数据写完 
strRange="d"&num&":f"&num ‘设定要填写内容的单元区域 
sheetActive.range(strRange).font.size=10 ‘设定字体大小 
sheetActive.range(strRange).WrapText=false ‘设定文字回卷 
sheetActive.range(strRange).ShrinkToFit=true ‘设定是否自动适应表格单元大小 
sheetActive.range(strRange).value=array(adoRset("bookid"),adoRset("bookname"),adoRset("author")) ‘把数据集中的数据填写到相应的单元中 
num=num+1 
adoRset.MoveNext 
loop 
支持(0) 中立(0) 反对(0)  单帖管理 | 引用 | 回复 回到顶部
帅哥哟，离线，有人找我吗？
引力波
 小大  2楼 个性首页 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：首席分析师 帖子：1554 积分：4008 威望：5 精华：10 注册：2002-12-5 10:22:01 		  发帖心情 Post By：2012-3-25 22:24:37

大家都希望实现这个功能，但是现在还不行

支持(0) 中立(0) 反对(0)  单帖管理 | 引用 | 回复 回到顶部
帅哥哟，离线，有人找我吗？
development
 小大  3楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：工程师 帖子：297 积分：2443 威望：0 精华：0 注册：2008-12-4 9:35:01 		  发帖心情 Post By：2012-3-26 8:07:41

支持一下！
支持(0) 中立(0) 反对(0)  单帖管理 | 引用 | 回复 回到顶部
帅哥哟，离线，有人找我吗？
admin
 小大  4楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 搭建官方
等级：管理员 帖子：5504 积分：20561 威望：9 精华：5 注册：2002-4-5 17:08:42 		  发帖心情 Post By：2012-3-26 8:40:30

增加该功能，会使 Frun.exe 增大很多，我们会考虑一个“动态”的方式，增加该功能。

支持(0) 中立(0) 反对(0)  单帖管理 | 引用 | 回复 回到顶部
帅哥哟，离线，有人找我吗？
x123992009
 小大  5楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 迷
等级：设计员 帖子：370 积分：2135 威望：0 精华：0 注册：2009-2-6 23:10:47 		  发帖心情 Post By：2012-3-26 9:30:45

FRUN。EXE。。早就应该分开了。打包时需要的构件才加进去

支持(0) 中立(0) 反对(0)  单帖管理 | 引用 | 回复 回到顶部
帅哥哟，离线，有人找我吗？
wbl051
 小大  6楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：设计师 帖子：500 积分：3508 威望：0 精华：0 注册：2008-3-8 10:23:03 		  发帖心情 Post By：2012-3-26 13:01:24

增加该功能，会使 Frun.exe 增大很多，我们会考虑一个“动态”的方式，增加该功能。

期待星下次升级能增加此功能及冻结窗口的功能。

有需要的朋友帮忙顶一下。
支持(0) 中立(0) 反对(0)  单帖管理 | 引用 | 回复 回到顶部
客人(61.135.*.*)
 小大  7楼


wpqKoZSfpyLT  发帖心情 Post By：2013-4-26 13:18:38

6dO2QL pricmmqiumuh, bsqvzcvbrmyp, [link=http://fofndwthupck.com/]fofndwthupck[/link], http://euyyjhgetxwf.com/

支持(0) 中立(0) 反对(0)  单帖管理 | 引用 | 回复 回到顶部

返回版面帖子列表

怎样调用Excel的Application组件，对excel进行操作！
签名：
RSS2.0　　Xhtml无图版　　Xslt无图版 搭建之星 网站·搭建者 Copyright © 2000 - 2011    Powered By Dvbbs Version 8.2.0
页面执行时间 00.05469 秒, 4 次数据查询