EOMExcel Automation Object ModelExcel的自动化模型对象。在VBS中输入图上脚本后可以看到Excel自动化模型已经被成功加入也就是说EOM下的所有封装方法和对象都已经可以调用。(在UFT可以输入excelApp.来查看其所有的封装对象和方法)WorkBook操作新增WorkBook创建Excel自动化模型对象 Set excelApp CreateObject(excel.application) 设置为可见模式如果遗漏Visible属性设置执行过程会在后台进行不会在前台显示。 excelApp.Visible true 新增WorkBook excelApp.Workbooks.Add 保存 excelApp.ActiveWorkbook.SaveAs F:\study\UFT\1.xlsx 关闭Excel如果没有关闭第二次创建EOM的话后台就会多一个Excel的进程如果继续创建EOM后台的Excel进程会越来越多而我们无法对其进行操控 excelApp.Quit 释放Excel对象 Set excelApp Nothing可以在文件下下看到新增了这样的一个excel文件打开WorkBookexcelApp.Workbooks.Open F:\study\UFT\1.xlsx创建Excel自动化模型对象 Set excelApp CreateObject(excel.application) 设置为可见模式如果遗漏Visible属性设置执行过程会在后台进行不会在前台显示。 excelApp.Visible true 打开WorkBook excelApp.Workbooks.Open F:\study\UFT\1.xlsx 关闭Excel如果没有关闭第二次创建EOM的话后台就会多一个Excel的进程如果继续创建EOM后台的Excel进程会越来越多而我们无法对其进行操控 excelApp.Quit 释放Excel对象 Set excelApp NothingWorkSheet操作新增WorkSheet为1.xls新增一个SheetSet sheet1 excelApp.Sheets.Add重命名Sheet为“Hello World”sheet1.Name Hello World创建Excel自动化模型对象 Set excelApp CreateObject(excel.application) 设置为可见模式如果遗漏Visible属性设置执行过程会在后台进行不会在前台显示。 excelApp.Visible true 打开WorkBook excelApp.Workbooks.Open F:\study\UFT\1.xlsx 为1.xlsx新增一个Sheet Set sheet1 excelApp.Sheets.Add 重命名Sheet为“Hello World” sheet1.Name Hello World 关闭Excel如果没有关闭第二次创建EOM的话后台就会多一个Excel的进程如果继续创建EOM后台的Excel进程会越来越多而我们无法对其进行操控 excelApp.Quit 释放Excel对象 Set excelApp Nothing获取Sheet对象并操作单元格Set oSheet excelApp.Sheets.Item(1) 获取Sheet1对象的引用创建Excel自动化模型对象 Set excelApp CreateObject(excel.application) 设置为可见模式如果遗漏Visible属性设置执行过程会在后台进行不会在前台显示。 excelApp.Visible true 新增WorkBook excelApp.Workbooks.Add 保存 excelApp.ActiveWorkbook.SaveAs F:\study\UFT\1.xlsx 打开WorkBook excelApp.Workbooks.Open F:\study\UFT\1.xlsx 操作Sheet1 Set oSheet excelApp.Sheets.Item(1) 重命名Sheet为 Hello World oSheet.Name Hello World 为第一行第一列赋值“Test” oSheet.Cells(1,1) Test 保存当前WorkBook excelApp.ActiveWorkbook.Save 关闭Excel如果没有关闭第二次创建EOM的话后台就会多一个Excel的进程如果继续创建EOM后台的Excel进程会越来越多而我们无法对其进行操控 excelApp.Quit 释放Excel对象 Set excelApp Nothing结果
)
