反復試了很多遍,確定問題出在以下這段代碼中,
community = xlsheetoriginal.Application.WorksheetFunction.Max(Range(Cells(2, a), Cells(m, a)))
community2 = xlsheetoriginal.Application.WorksheetFunction.Max(Range(Cells(2, b), Cells(m, b)))
If community2 > community Then
community = community2
End If
car = xlsheetoriginal.Application.WorksheetFunction.Max(Range(Cells(2, c), Cells(m, c)))
由于本人是個半調子,只知道這個陳述句里面應該是有東西沒定義父物件,導致運行完成后excel.exe沒法結束,但是查了半天也沒查出來到底是哪個東西。
uj5u.com熱心網友回復:
要呼叫 excel 的 關閉命令.uj5u.com熱心網友回復:
Application.Quit應該可以退出Exceluj5u.com熱心網友回復:
定義:Private m_objExcel As Excel.Application
關閉
m_objExcel.Quit
uj5u.com熱心網友回復:
運行完后,要把EXCEL給關了轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/128884.html
標籤:VB基礎類
上一篇:Workbooks.Add 導致listbox滾動條不能滾動到最下面
下一篇:請教技術問題
