多个excel表,每天自动打开,数据自动更新,写了vbs自动保存关闭,但打开后如不先选中下excel,vbs运行没效果
每天表格自动打开更新后,vbs设定了自动运行,不过运行后没效果,总需要手动切换到表格界面,在切回来,运行vbs,才能生效,哪位大神知道这是为什么,问题出在哪on error resume nextSet excelApp=getObject(,"excel.application")if err.number=0 thenon error goto 0excelApp.DisplayAlerts=falsefor i=excelApp.workbooks.count to 1 step -1excelApp.workbooks(i).saveexcelApp.workbooks(i).closenextexcelApp.quitset excelApp=Nothingend if这是写的vbs