Есть несколько вариантов:
- Самое быстрое воспользоваться командой найти и заменить (CTRL + H), которую надо повторить на каждом листе.
- Если команд несколько, то можно записать все команды в макрос (Вид/Макросы/запись макроса - провести изменения одного листа - Вид/Макросы/остановить макрос) и выполнить макрос на каждом листе.
- если листов очень много надо изменить макрос поместив все команды внутрь цикла по всем листам.
<h2>Пример:</h2>
<h2>заменить на всех листах текст "йцукен" на 12345</h2>
Нажимаем Вид/Макросы/запись макроса
Выполняем команду:
CTRL + H
в поле Найти пишем йцукен
в поле Заменить на пишем 12345
Нажимаем заменить все
Нажимаем Вид/Макросы/Остановить запись
При этом создался макрос выполнения указанных команд:
Sub Макрос1()
'
' Макрос1 Макрос
'
Cells.Replace What:="йцукен", Replacement:="12345", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub
Добавляем цикл по всем листам и получаем
Sub Макрос1()
'
' Макрос1 Макрос
'
For Each iList In Worksheets
iList.Select
Cells.Replace What:="йцукен", Replacement:="12345", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Next
End Sub