Я знаю, что есть пара подобных вопросов, но чем больше я читаю, тем дальше я, кажется, отдаляюсь от своего ответа.
У меня есть диапазон (Org) со значениями, для которых я хотите посмотреть, существуют ли значения в NamedRange. Название для NamedRange построено из концентрата форумла в ячейке «D4», оно может варьироваться. «Alt» - это диапазон, в который я хочу записать значение, найденное в NamedRange.
Код, который у меня есть на данный момент:
Dim DS_Att As String
Dim Org As Range
Dim Alt As Range
Dim i As Range
Dim ws1 As Worksheet
Set ws1 = Worksheets("DS_Untertyp")
DS_Att = Range("D4").Value
Set Org = Range("E4", Range("E4").End(xlDown))
Set Alt = Org.Offset(0, 1)
For Each i In Alt
i = WorksheetFunction.VLookup(i.Offset(0, -1).Value, Application.Goto(ThisWorkbook.ws1.Range(DS_Att)), 1, False)
Next
Однако код не работает ( Я думаю, что есть больше чем одна ошибка).
Кто-нибудь может указать мне правильное направление?
Спасибо!