很少用到excel.application对象,所以不是很有研究。
碰到Workbooks.Open打开文件时使用相对路径会出错的问题,例如包含下面代码的VBS文件和data.xls在同一目录下
Dim oExcel Set oExcel = CreateObject("excel.application") oExcel.Visible = True oExcel.Workbooks.Open "data.xls"
运行却会报错
无法找到“data.xls”。请检查文件名的拼写,并检查文件位置是否正确。
如果您正试图从“文件”菜单上最近使用的文件列表中打开文件,请确认文件未被重命名、移动或删除。
看来相对路径相对的不是vbs文件的路径,那么到底是相对哪里的路径呢?答案是“我的文档”,把data.xls放到“我的文档”根目录下再运行代码就不报错了。