excelHandle.WorkBooks.Open excelArr(tmpIndex).ShortPath
Set wbSegFile = excelHandle.ActiveWorkbook
Set sheetSegFile = excelHandle.WorkSheets(1)
\'Set wbSegFile = excelHandle.Workbooks.Open excelArr(tmpIndex).ShortPath
\'Set sheetSegFile = wbSegFile.Sheets(1)
就算之前设置过 excelHandle.Visible = False 程序执行中间有excel人工打开 还是会显示后台跑的～