VBA сравнение ячеек столбца С:С с Е:Е

[johny_03]

нужно найти совпадения ячеек столбца С и столбца Е и вывести все совпавшие ячейки в столбец G по клику кнопки

Формат ячеек ТЕКСТОВЫЙ, поэтому ВПР не подходит

Огромное спасибо!

[Hugo121]

36 сообщений?...
И с каких пор ВПР() только с числами работает?

[johny_03]

ну насколько я понимаю, для ВПР нужен числовой идентификатор.
Если я не прав, подскажите как написать формулу, буду очень признателен!

[gluk_fm]

Где пример?

[Казанский]

Макрос для кнопки. С помощью ВПР.

Sub Макрос1()
Dim lr&
lr = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row - 1
With Range("G1:G" & lr)
    .Formula = "=VLOOKUP(E1,C$1:C$" & lr & ",1,)"
    .SpecialCells(xlCellTypeFormulas, xlErrors).Delete Shift:=xlUp
    .Value = .Value
End With
End Sub

[johny_03]

вот пример

[johny_03]

Казанский Большое спасибо!

[Hugo121]

Да, MAGIC!...
Я бы вероятно делал на словаре и трёх массивах
Сработало бы может быть не медленнее (а может и быстрее на большом объёме), и есть свои плюсы, но кода конечно намного больше писать бы пришлось....