Я пытаюсь сравнить два листа в одной книге. Мне нужно сопоставить значения в столбце A первого листа со столбцом A листа 2 и, если найдено совпадающее значение, скопируйте и вставьте значение из столбца E листа 2 в столбец E листа 1. Например:Excel VBA - Передача данных между листами
Sheet 1: A B C D E Sheet 2: A B C D E
k 9 b 3 k d 3 d 6
j 2 d 4 m h 4 g 3
s 3 u 9 j e 8 a 9
i 4 s 6 s i 9 t 7
o 7 n 8 l b 10 s 9
i c 4 p 8
o l 0 n 9
стал бы
Sheet 1: A B C D E
k 9 b 3 6
j 2 d 4 9
s 3 u 9 7
i 4 s 6 8
o 7 n 8 9
код Сейчас я работаю с есть: Sub mergeCategoryValues () Dim lngRow As Long
With ActiveSheet
lngRow = .Cells(65536, 1).End(xlUp).Row
.Cells(1).CurrentRegion.Sort key1:=.Cells(1), Header:=xlYes
Do
If .Cells(lngRow, 1) = Sheets("Sheet2").Cells(lngRow, 1) Then
.Cells(lngRow, 5) = Sheets("Sheet2").Cells(lngRow, 5)
End If
lngRow = lngRow - 1
Loop Until lngRow < 2
End With
End Sub
Мне нужно вытаскивать дубликаты независимо от случая. Это возможно?
Любая помощь приветствуется.
Заранее спасибо.
Не подходит ли VLOOKUP или INDEX/MATCH? – pnuts
VLOOKUP работал хорошо. Я пытался найти способ сделать то же самое с VBA, но я думаю, что это не стоит. Благодаря! – Texas2014