(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體:
版本:
小弟的excel報表目前在慢慢鍛煉中
總檔案41mb多
因為之前不會vba 所以很多都用f(x)來寫
目前已經開始慢慢重寫轉由vba來運算,減輕壓力
評估未來可少掉10-20多mb
不過小弟遇到一個問題
我目前蠻多的引數都是靠f(x)的排序或者索引來代入
當我將15000-20000筆的網頁原始碼以純文字匯入後
竟然發現某行程式碼出問題
Sheets("員工分析").Range("a:k").ClearContents
Sheets("原始碼").Range("a:k").Copy
Sheets("員工分析").Range("a:k").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
在這樣的情況下,他說發現錯誤,幾乎都是第三行跟第四行出錯
然後我改成以下這樣
Sheets("員工分析").Select
Sheets("員工分析").Range("a:k").ClearContents
Sheets("原始碼").Select
Sheets("原始碼").Range("a:k").Copy
Sheets("員工分析").Select
Sheets("員工分析").Range("a:k").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
用select來當作緩衝的時間巴Q.Q (自以為啦)
但確實程式碼就不再出問題了
懷疑有時後vba會被來不及運算的excel工作表,或者被f(x)還來不及運算完
導致excel工作表,來不及運作
不曉得小弟的猜測是否有錯