2014-09-10 58 views
-2

我剛剛寫了一個VBA腳本來在Excel中執行批量查找和替換。我需要爲超過150,000個單元的數據執行此功能。我使用一個Do循環來比較表A上的值與表B上的值(FIND)和相關代碼(REPLACE)。VBA中的Do循環運行時錯誤

我正在使用一個索引計數器,聲明爲Dim i作爲整數,具有Do Loop控制索引的每次迭代。 VBA腳本可以工作,但是一旦索引超過30,000,我會收到「運行時錯誤」6:「溢出」錯誤消息?是否可以迭代Do循環多少次?或者有人知道在Excel中執行批量查找和替換的好方法嗎?

回答

0

嘗試此

ActiveSheet.Cells.Replace(屬性oldValue,的NewValue,xlPart)

ActiveSheet.Cells包含在片材內的所有單元。

希望這有助於

+0

我應該更清楚。替換背後有一些邏輯。工作表A包含150,000行數據,其中一列是字母數字代碼。工作表B包含將這些代碼翻譯成更有意義的列表。我編寫了一個宏,它將工作表A中的每一行都找到,在工作表B上找到翻譯代碼,然後將其交換出來。有250代碼的可能性,否則我會做一個簡單的嵌套如果公式。 – maz 2014-09-10 18:54:15