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人工打开 还是会显示后台跑的~