VB操作Excel

VB操作Excel

详细内容请参看博客,这篇博客的内容很详尽，有些在VB中会报错，是VBA中的语法。
下面列一些我在本次签到程序中用到的一些语句：
1、新建一个Excel的Application

Dim ExcelID As Excel.Application 
Set ExcelID = New Excel.Application

2、隐藏工作薄（运行在后台）

ExcelID.Visible = True 'True的话显示当前窗口  False则隐藏，其实已经打开该工作表

3、修改新建工作薄的默认工作表数量
不同电脑不同版本的excel新建工作薄的数量可能会有差异，我的电脑是新建工作薄默认有3个工作表，而当我把程序放到另一台电脑就出现了下标越界的错误，经过调试发现那一台电脑新建工作薄的工作表数量是1，所以有时为了兼容，在前面加一个设置工作薄默认工作表的数量。

ExcelID.SheetsInNewWorkbook = 2 '修改默认工作薄的数量

4、添加新的工作薄
ExcelID.Workbooks.Add 与Workbooks.Add并不等价

ExcelID.Workbooks.Add  '添加exc