来自两个不同文件的Vlookup数据

时间:2019-03-29 16:09:02

标签: excel vba

我遇到了vlookup问题。

我在两个不同的文件中都有数据,并且在第一张纸的A列和B列的每个文件中都有共同的数据(基本上是日期和小时)。

我想要一个查找宏从A列(第一个单元格是否与另一个文件匹配)中进行检查,然后复制粘贴同一行的第二个和第三个单元格的值。

我正沿着这条路走,但是我有点卡住了...

Dim i As Long
Dim j As Long

Sheet1LastRow = Worksheets("TdB Quotidien").Range("A" & Rows.Count).End(xlUp).Row
Sheet2LastRow = Worksheets("Feuil1").Range("A" & Rows.Count).End(xlUp).Row

For j = 2 To Sheet1LastRow
    For i = 2 To Sheet2LastRow
        If Worksheets("TdB Quotidien").Cells(j, 1).Value = Worksheets("Feuil1").Cells(i, 1).Value Then
            Worksheets("TdB Quotidien").Cells(j, 2).Value = Worksheets("Feuil1").Cells(i, 2).Value
            Worksheets("TdB Quotidien").Cells(j, 3).Value = Worksheets("Feuil1").Cells(i, 3).Value
            Worksheets("TdB Quotidien").Cells(j, 4).Value = Worksheets("Feuil1").Cells(i, 4).Value
        Else
        End If

0 个答案:

没有答案