Мне нужно заменить данные из всего столбца данными из другой таблицы (на другом листе) на основе содержимого ячейки.
Я строю базу данных на основе записей за последние 10 лет.Система моего офиса и первый столбец моей таблицы - это идентификатор записи.На другом листе я создал таблицу со ссылкой на продукт каждого идентификатора (ColA = ID, ColB = Product).Мне нужно создать код vba, который заменяет каждый идентификатор из моей первой таблицы именем продукта в ColB из другой таблицы, так как существует много идентификаторов, и они могут повторяться много раз.
Я не очень привык к VBA, поэтому не знаю с чего начать.
-EDIT- В нескольких попытках я пытаюсь использовать функцию For Each.Моя идея состояла в том, чтобы создать какой-то массив для Col1 в первой таблице и прочитать каждую ячейку, сравнивая с Col1 в Table2 и, при равенстве, заменить соседней ячейкой в Table2
Private Sub massive_update()
Dim code1 As Range
Dim code2 As Range
Dim prod As Range
code1 = "E3:E122"
code2 = "A2:A37"
prod = "B2:B37"
For Each Item In code1
If code1 = code2 Then
Columns("E").Replace what:=code1, replacement:=code2, lookat:=xlPart, MatchCase:=False
End If
End Sub