我的 VBA 中的 VLOOKUP 遇到了一些问题。这是我正在使用的代码示例:
Sub Macro15()
'
' Macro15 Macro
Dim LR As Long
LR = Cells(Rows.Count, "A").End(xlUp).Row
Range("B1:B" & LR).FormulaR1C1 = _
"=VLOOKUP(RC[-1],'https://internal_sharepoint_address
/[Vendor_Information.xlsx]Sheet1'!R3C3:R150C18,4,FALSE)"
Range("C1:C" & LR).FormulaR1C1 = _
"=VLOOKUP(RC[-2],'https://internal_sharepoint_address
/[Vendor_Information.xlsx]Sheet1'!R3C3:R150C18,5,FALSE)"
With Range("B1:C" & LR)
.Value = .Value
End With
End Sub
问题是 B 列和 C 列(VLOOKUP 公式)中的值返回 #N/A 值。
但是,如果我在将公式转换为值之前停止代码(“With Range("B1:C" & LR)" 行),VLOOKUP 公式将返回正确的值。
也很奇怪 - 如果我清除 B 列和 C 列的内容并重新运行上面的代码,值返回正常。但是,如果我尝试向 VBA 添加第二个循环,它就不起作用。
任何人能提供的任何智慧都会有很大的帮助。我已经被困在这个问题上很长时间了,我只是无计可施。
谢谢大家,大卫