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
解决方案
推荐阅读
- python-3.x - 打印类的属性
- opencv - OpenCV imread() 不工作
- php - 本地主机映像地址中的 Url 错误
- c# - WPF UserControl DependencyProperty 在 XAML 中使用或通过绑定
- php - 无法在 laravel 中进行身份验证
- laravel - 自定义 Laravel 分页链接不起作用
- python - Socket.py 没有属性 AF_INET
- python-3.x - 矩形,使用 python3 进行轮廓检测,opencv3
- javascript - 有没有办法列出频道的私人或不公开视频?
- php - Sweetalert (Ajx - PHP Form) 仅在输入字段为空时显示成功(警报)