电脑桌面
添加小米粒文库到电脑桌面
安装后可以在桌面快捷访问

vb导出excel报表VIP免费

vb导出excel报表_第1页
1/6
vb导出excel报表_第2页
2/6
vb导出excel报表_第3页
3/6
VB 是常用的应用软件开发工具之一,由于VB 的报表功能有限,而且一但报表格式发生变化,就得相应修改程序,给应用软件的维护工作带来极大的不便。因此有很多程序员现在已经充分利用EXECL 的强大报表功来实现报表功能。但由于VB 与EXCEL 由于分别属于不同的应用系统,如何把它们有机地结合在一起,是一个值得我们研究的课题。 一、 VB 读写 EXCEL 表: 能获取到表的行数的代码:xlSheet2.UsedRange.Rows.Count VB 本身提自动化功能可以读写 EXCEL 表,其方法如下: 1、在工程中引用Microsoft Excel 类型库: 从"工程"菜单中选择"引用"栏;选择 Microsoft Excel 9.0 Object Library(EXCEL2000),然后选择"确定"。表示在工程中要引用EXCEL 类型库。 2、在通用对象的声明过程中定义 EXCEL 对象: Dim xlApp As Excel.Application Dim xlBook As Excel.WorkBook Dim xlSheet As Excel.Worksheet 3、在程序中操作EXCEL 表常用命令: Set xlApp = CreateObject("Excel.Application") '创建 EXCEL 对象 Set xlBook = xlApp.Workbooks.Open("文件名") '打开已经存在的EXCEL 工件簿文件 xlApp.Visible = True '设置 EXCEL 对象可见(或不可见) Set xlSheet = xlBook.Worksheets("表名") '设置活动工作表 xlSheet.Cells(row, col) =值 '给单元格(row,col)赋值 xlSheet.PrintOut '打印工作表 xlBook.Close (True) '关闭工作簿 xlApp.Quit '结束 EXCEL 对象 Set xlApp = Nothing '释放 xlApp 对象 xlBook.RunAutoMacros (xlAutoOpen) '运行 EXCEL 启动宏 xlBook.RunAutoMacros (xlAutoClose) '运行 EXCEL 关闭宏 4、在运用以上 VB 命令操作EXCEL 表时,除非设置 EXCEL 对象不可见,否则 VB 程序可继续执行其它操作,也能够关闭 EXCEL,同时也可对 EXCEL 进行操作。但在EXCEL操作过程中关闭 EXCEL 对象时,VB 程序无法知道,如果此时使用EXCEL 对象,则 VB 程序会产生自动化错误。形成 VB 程序无法完全控制 EXCEL 的状况,使得VB 与EXCEL 脱节。 二、 EXCEL 的宏功能: EXCEL 提供一个Visual Basic 编辑器,打开Visual Basic 编辑器,其中有一工程属性窗口,点击右键菜单的"插入模块",则增加一个"模块1",在此模块中可以运用Visual Basic 语言编写函数和过程并称之为宏。其中,EXCEL 有两个自动宏:一个是启动宏(Su...

1、当您付费下载文档后,您只拥有了使用权限,并不意味着购买了版权,文档只能用于自身使用,不得用于其他商业用途(如 [转卖]进行直接盈利或[编辑后售卖]进行间接盈利)。
2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。
3、如文档内容存在违规,或者侵犯商业秘密、侵犯著作权等,请点击“违规举报”。

碎片内容

vb导出excel报表

确认删除?
VIP
微信客服
  • 扫码咨询
会员Q群
  • 会员专属群点击这里加入QQ群
客服邮箱
回到顶部