目录
一、文件操作
添加新工作演:WorkBooks.Add
打开工作:WorkBooks.Open
设置当前工作表:WorkSheets(“sheet2”)Activate
保存:save
工作演另存为:WorkBooks.SaveAs
关闭工作薄:WorkBooks.Close
退出excel程序: Quit
设置excel打开时是否可见: Visible
是否显示提示信息:displayalerts
二、内容操作
单元格读取、赋值Cells(1,4).Value
在第二行的下面插入一行: ActiveSheet.Rows(2).Insert
在第以行的前面插入一列: ActiveSheet.Columns(1).Insert
删除第二行: ActiveSheet.Rows(2).Delete
删除第二列:ActiveSheet.Columns(1).Delete
操作exce1文件
Dim oExcel
Set oExcel = WScript.CreateObject("Excel.Application")
oExcel.Visible=True
新建工作簿
oExcel.Workbooks .Add
保存文件
oExcel.Save "D: test5\test.xls"
打开exce1文件
oExcel.Workbooks.Open "D:\test5\test.xls"
向单元格写入数据
oExcel.Cel1s(1,4)="vbs"
获取单元格的值
MsgBox oExcel.Ce11s(1,4) .value
将工作簿另存为
oExcel.ActiveWorkbook.saveAs "D: test5\test.xls"
oExcel.Cel1s(1,4)="vbs,666"
设置提示窗是否可见
oExcel.DisplayAlerts=False
oExcel.ActiveWorkbook.SaveAs "D:\test5 test.xls"
oExcel.DisplayAlerts=true
退出excel程序
oExcel.Quit