Автор Тема: Функция вставки значения с ячейки на другом листе, при условии совпадения значения в других ячейках.  (Прочитано 179 раз)

infodba

  • Гость
Здравствуйте, помоги советом как реализовать на VBA вот что :
Есть файл Пример.xlsm.
Необходимо взять значение с листа База2 С7 и сравнить его с со всеми ячейкам столбца С листа База1.
При совпадении запомнить номер строки и занести его в переменную а. После этого взять значение G7 Листа База2 и вставить с заменой на лист База1 Столбец E а номер строки в переменной а. + окрасить всю эту строку в зеленый цвет.

Макрос написать с горем пополам получается, но выходит громоздкий код, так как гос номеров около 200, необходимо наверное цикл намутить с перебором всех номеров с листа База2 столбца С и при совпадении с листом База1 записать значение пробега и отметить зеленым цветом.
Раньше пользовался формулой =ЕСЛИ('База1'!С7=База2!D75;"Гос номер не совпал") и так в каждой ячейке.
Хочу все-таки на VBA сделать. Я так понимаю мне нужен Range.Find с условием юзать ?

Оффлайн Администратор

  • Administrator
  • Сообщений: 2017
Файл я себе взял, больше выкладывать его не надо.
На знаю, смогу ли помочь, сегодня - завтра посмотрю.