VB 中读写 EXCEL 文件
(2011-01-11 22:41:47)
转载
标签:
工作表
单元格
设置
边距
对象
it
分类: 计算机教程
在 VB 中要想调用 Excel,需要打开 VB 编程环境“工程”菜单中的“引用”项目,
并选取项目中的“Microsoft Excel 11.0 object library”项。由于你的 Excel
版本不同,所以这个选项的版本号可能不同
。定义 EXCEL 对象
Dim XlsObj As Excel.Application 'Excel 对象
Dim XlsBook As Excel.Workbook '工作簿
Dim XlsSheet As Excel.Worksheet '工作表
。打开或创建 EXCEL
Set XlsObj = CreateObject("Excel.Application") '创建 EXCEL 对象
XlsObj.Visible = True '设置 EXCEL 对象可见(或不可见)
'打开已经存在的 test.xls 工件簿文件
Set xlbook = xlapp.Workbooks.Open(App.Path & " est.xls")
'创建有一个工作表的工作簿
XlsObj.SheetsInNewWorkbook = 1
Set XlsBook = XlsObj.Workbooks.Add
。设置活动工作表
'或者 Set XlsSheet = XlsObj.Worksheets(1) 代表第 1 个 Sheet
Set XlsSheet = XlsObj.Worksheets("表名")
评论8