Поиск по значению ячейки и замена относительно нее

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Поиск по значению ячейки и замена относительно нее (Макросы/Sub)

GreenStalker

Дата: Четверг, 27.03.2014, 21:16 | Сообщение № 1

Группа: Гости

Получаем заполненные бланки, формат горизонтальный А4.
Листы отделены друг от друга разрывом страницы.
На листе два бланка с правой и левой стороны.
Нужно найти значение ячейки и относительно найденной ячейки заменить несколько ячеек (например на ячейку вниз и два влево).
Как это возможно сделать.

Так понимаю что нужно искать функцией
[vba]

Код

Cells.Find(What:="Лор", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False).Activate

[/vba]
[moder]Читайте Правила форума
Прикладывайте свой пример в Excel

Ответить

RAN

Дата: Четверг, 27.03.2014, 22:30 | Сообщение № 2

Группа: Друзья

Ранг: Экселист

Сообщений: 5660

Репутация: 1163 ±

Замечаний: 0% ±

2010

И постарайтесь об Excel говорить на языке Excel.
Листы в Excel разрывом страницы друг от друга не отделяются.
На крайний случай - ярлычками листов.

Быть или не быть, вот в чем загвоздка!

Ответить

GreenStalker

Дата: Суббота, 29.03.2014, 15:45 | Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Если текущий месяц (в данном случае март - 03 залит сиреневым) и услуга минусовая (залит желтым) тогда сложить желтую ячейку с плюсом и красную ячейку и записать в красную ячейку с очисткой желтой ячейки и зеленых ячеек. Файл прикрепил. Оч. надо, заранее спасибо за ответы.
[p.s.]
Таких бланков несколько тысяч на листе.[/p.s.]

К сообщению приложен файл: __2014-3-.xls (49.5 Kb)

Сообщение отредактировал Serge_007 - Суббота, 29.03.2014, 15:50

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Поиск по значению ячейки и замена относительно нее (Макросы/Sub)

Страница 1 из 1
1