Какой самый быстрый способ заменить значение в ячейках через VBA

Question

Некоторые ячейки в моей книге содержат значение «A». Я хочу заменить значение «A» на «B».

Они разбросаны по нескольким листам. Какой самый эффективный способ осуществить замену в 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 , но я подумал, что это облегчит работу сразу с несколькими рабочими книгами.