通过 VBA 替换单元格中的值的最快方法是什么

Question

我的工作簿中的某些单元格包含值“A”。我想用“B”替换值“A”。

它们分散在几张表中。在 VBA 中实现替换的最有效方法是什么？

Answer 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对，但我认为这将使您更容易同时运行多个工作簿。