我的工作簿中的某些儲存格包含值「A」。我想用“B”替換值“A”。
它們分散成幾張。在VBA中實現替換最有效的方法是什麼?
答案1
這對我有用
For Each wb In Workbooks
For Each sh In wb.Worksheets
sh.Cells.SpecialCells(xlCellTypeConstants).Replace What:="a", Replacement:="b", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Next sh
Next wb
我所做的只是使用巨集記錄器來記錄查找和替換操作,然後添加循環。
如果您不想在所有開啟的工作簿中進行更改,請刪除外部For
Next
對,但我認為這將使同時運行多個工作簿變得更容易。