Макрос ВПР

[nasturcia]

Всем привет! Нужна помощь с макросом. Сама только начинаю изучать эту сферу. Есть файл с заказом. Необходимо с листа 2 по полю Вн. код покуп. подтянуть 1,2,4 и 5 столбцы. Строк всегда разное количество. столбцы всегда в одном и том же месте. Заранее спасибо!

[Aleksandr H.]

тот ВПР из L,M,N18 чем не сгодился?

[Hugo121]

Чем собственно не годится ВПР()?
А если уж так очень нужен макрос - запишите весь процесс рекордером (с финальным копипастом значений) - получите нужный макрос.

[Казанский]

Sub bb()
  With Range("L18:N" & Cells(Rows.Count, "D").End(xlUp).Row)
    .Rows(1).FormulaArray = "=VLOOKUP(D18,Лист1!A:E,{2,4,5},0)"
    .Rows(1).AutoFill .Cells
    .Value = .Value
  End With
End Sub

[nasturcia]

Александр, удобнее было бы копировать информацию в один файл, нажимать кнопку и все быстро подтягивалось бы.

Также хотят видеть сравнения с первым листом по подтянутым полям. Файл приложила.

[nasturcia]

Спасибо, работает!

А возможно добавить столбцы для проверки совпадения данных с первым листом? см. вложение