【vbs+excel】vbs编辑excel

网上一查一大把，不过也做个简单的记录吧。

Set ExcelApp = CreateObject("Excel.Application")
ExcelApp.Visible = True
Set ExcelBook = ExcelApp.Workbooks.Open ("C:\Users\Administrator\Desktop\1.xlsx")
Set ExcelSheet = ExcelApp.Sheets.Item(1)   
ExcelSheet.Columns(1).ColumnWidth = 20
ExcelSheet.Columns(2).ColumnWidth = 25

ExcelApp.Cells(1,1).Value = "*****"
ExcelApp.Cells(2,1).Value = "*****"

ExcelBook.Save 
ExcelApp.Quit 

#学习笔记