返回列表 上一主題 發帖

[發問] 請問如何比對欄位資料並取得相對欄位值呢?[以解決]

回復 1# 悲歡雙心


    沒有很詳細測試,而且資料不太齊整,只是看了一兩眼~

以下是值得留意的地方:

1. 這句比較在意,
    On Error Resume Next '沒有加這一行會出錯
有沒有說是什麼地方出錯? 出錯的地方可能影響資源回收.

2. 在vba寫東西到sheet 前 運這句
application.Calculation=xlCalculationManual
在vba寫東西到sheet 後 運這句
application.Calculation=xlCalculationautomatic
那麼格子不用每寫小許就重算一次, 一次過計算.
懂得發問,答案就會在其中

今日の一秒は  明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

回復  kimbal

    On Error Resume Next '沒有加這一行會出錯
有沒有說是什麼地方出錯? 出錯的地方可能 ...
shadowming 發表於 2010-7-20 22:51



如果預計代碼會有錯,但又不影響整體運作, 用這一句,就可以不顯示錯誤或跳出錯誤,繼續運下一句.

當年vb6未有像vb.net,c++ 等等的 try...catch的語句,  
on error goto .../ resume next 對vb來說可以說是try...catch的前身
懂得發問,答案就會在其中

今日の一秒は  明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

        靜思自在 : 站在半路,比走到目標更辛苦。
返回列表 上一主題