Срочно нужна помощь

[PoWeRaDe]

Есть документ "Книга продаж" на 80 листах в Excel. Нужно сделать следующее:
Есть некоторые поля которые нужно переименовать в "отгрузка"
Некоторые в "аванс"
И некоторые "по авансу"

Можно ли это как нибудь сделать?

Вот такой вариант:
12.06.04 №4562182ОП - переименовать в "отгрузку"
12.06.04 №126571ОС; аванс - переименовать в "аванс"
12.06.04 №465157; по авансу - переименовать в "по авансу"

И таких напомню 80-90 листов

Помогите кто знает.

[Vitaly1]

Ну пот тебе вариант замены yy на 12

Код: Выделить всё

sub zam
For i=1 to activeworkbook.Sheets.Count
activeworkbook.Sheets(i).activate
Cells.Replace What:="yy", Replacement:="12", LookAt:=xlWhole, _
        SearchOrder:=xlByRows, MatchCase:=False
next i
end sub

[san*]

По-моему замены можно делать и без скриптов, разве я ошибаюсь?

[PoWeRaDe]

По-моему замены можно делать и без скриптов, разве я ошибаюсь?

А ты сколько будешь заменять 2546 строк???

[san*]

По-моему замены можно делать и без скриптов, разве я ошибаюсь?

А ты сколько будешь заменять 2546 строк???

А как на счет "заменить все"?