来自不同工作表的 VBA Vlookup

时间:2021-07-29 20:23:35

标签: excel vba vlookup

我正在尝试编写一个 vlookup 代码,它使用查找选项卡作为数组 (A:B) 和 vlookup 在单元格 Y2 中的收入选项卡。我需要它一直填满 Y 列。

Sub VLOOKUP()

Dim LookupsLastRow As Long
Dim RevenueLastRow As Long
Dim LookupsSheet As Worksheet
Dim RevenueSheet As Worksheet


'What are the names of our worksheets?
Set LookupsSheet = Worksheets("Lookups")
Set RevenueSheet = Worksheets("Revenue")

'Determine last row of source
With LookupsSheet
    LookupsLastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
End With
With RevenueSheet
    'Determine last row in col P
    RevenueLastRow = .Cells(.Rows.Count, "X").End(xlUp).Row
    'Apply our formula
    .Range("Y2:Y" & RevenueLastRow).Formula = _
        "=VLOOKUP(V2,"Lookups"!$A$2:$B$" & LookupsLastRow & ",2,0)"
End With



End Sub

0 个答案:

没有答案
相关问题