狀況:用VBA鑲入VB的情況(Excel2000、VB6)
實例:VBA的語法是從錄製巨集來的
Set XlsApp = CreateObject("excel.application")
XlsApp.Visible = True
XlsApp.Workbooks.Add
.........
.........
.........
.........
XlsApp.Range(("A2"), ("T" & Trim(Str(intCnt)))).Select
XlsApp.Selection.Sort Key1:=Range("A:A"), Order1:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
XlsApp.DisplayAlerts = False
Set XlsApp = Nothing
最後把他完全關掉,跳出VB程式就可run出我要的排序結果了.
但是不跳出vb程式,再run一次就發生sort的功能錯誤....之類的。可是我不想關掉他,可以繼續操作執行不發生錯誤,但是我就不知道如何去修改他,第一次明明就成功了,為什麼繼續第二次執行就會出錯,真是搞不懂,煩請各位前輩為小弟指點迷津,謝謝!!!

全站熱搜

vbqa 發表在 痞客邦 留言(0) 人氣()