Подскажите а можно ли в одну строку написать этот код?
Есть такой код:
sh_mat.Cells(i, 9).Value = _
WorksheetFunction.VLookup(sh_mat.Cells(i, 4).Value, sh_spravka.Columns("A:I"), 3, 0)
jD2 = sh_mat.Cells(i, 9).Value
Но хотелось быть это записать одной строкой, но с 2-мя знаками равно. Но это не работает:
sh_mat.Cells(i, 9).Value = WorksheetFunction.VLookup(sh_mat.Cells(i, 4).Value, sh_spravka.Columns("A:I"), 3, 0)=jD2
Т.е нужно чтобы значение sh_mat.Cells(i, 9).Value после того как сработает функция ВПР присвоилось переменной jD2.
Нет, такого в VBA нет.
ОК. Спасибо.
В данном случае правильно делать так, чтобы макрос быстро работал:
Dim var
var = WorksheetFunction.VLookup(sh_mat.Cells(i, 4).Value, sh_spravka.Columns("A:I"), 3, 0)
sh_mat.Cells(i, 9).Value = var
jD2 = var