Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Функция ВПР с ДВССЫЛ по переменному данному
 
#1
27.08.2015 22:07:33
Доброго всем времени суток. Возник срочный вопрос. Есть несколько листов с данными, есть сводник. Требуется что бы с помощью ВПР и имени листа (переменной данной в своднике) он искал и заполнял данные. Пробовал несколько вариантов. Голова кипит. ХЕЛП.!!! Пример прилагаю
 
 
 
#2
27.08.2015 22:31:43
Вот, через ДВССЫЛ (переделал, чтобы при протягивании не "ехало")
Код
=ВПР($C10;ДВССЫЛ($B$2&"!C:F");СТОЛБЕЦ()-2;0)
Изменено: МВТ - 27.08.2015 22:37:06
 
 
 
#3
27.08.2015 22:37:08
Здравствуйте.
Для "количества"
Код
=ВПР(C10;ДВССЫЛ(B2&"!C9:F13");3;ЛОЖЬ)

ДВССЫЛ преобразуем текстовую строку в адрес диапазона на нужном листе. Текстовую строку формируем из значения "переменной" ячейки и адреса диапазона. В кавычках - потому как строка. :)
Для остальных столбцов - меняете внутри ВПР номер нужного для вывода столбца.
Кому решение нужно - тот пример и рисует.
 
 
 
#4
27.08.2015 22:40:00
Спасибо огромное!!! Работает
 
 
 
#5
27.08.2015 22:51:45
Иван Фильченков, как вариант, чтобы избежать летучих формул. Макрос вставить в код листа "Сводник"
UPD исправил, чтобы не вылетало если не находит нужного значения
Код
Sub tt()
Dim L As Long, L1 As Long
Dim Rng As Range
For i = 10 To Cells(Rows.Count, 3).End(xlUp).Row
With Sheets(Cells(2, 2).Value)
    Set Rng = .Range("C10:F" & .Cells(Rows.Count, 3).End(xlUp).Row)
End With
On Error Resume Next
Cells(i, 5) = Application.WorksheetFunction.VLookup(Cells(i, 3).Value, Rng, 3, 0)
Cells(i, 6) = Application.WorksheetFunction.VLookup(Cells(i, 3).Value, Rng, 4, 0)
Next i
End Sub
Изменено: МВТ - 27.08.2015 22:58:29
 
 
 
#6
27.08.2015 23:46:49
Пытливый, подскажите, а если таблицы имеют не одинаковый размер, в своднике еще есть столбцы?
 
 
 
Страницы: 1
Читают тему
Наверх