VlookUp 使用数字而不是文本答案

【问题标题】：VlookUp working with Numbers but Not TextVlookUp 使用数字而不是文本
【发布时间】：2015-09-28 18:14:37
【问题描述】：

我一直在使用 VLookUp 来匹配 numbers 我想尝试在 text 上使用它与 exact 匹配

当我这样做时，我什么也得不到，no 完全匹配，即使存在匹配项

Sub Match()

Dim I As Long, j As Long, cnt As Long
Dim lValue As Long
Dim Sheet1 As Worksheet, Sheet2 As Worksheet

Set Sheet1 = Worksheets("Sheet1")
Set Sheet2 = Worksheets("Sheet2")

I = Sheet1.Cells(Rows.Count, "A").End(xlUp).Row
j = Sheet2.Cells(Rows.Count, "A").End(xlUp).Row

For cnt = 2 To j
On Error Resume Next
lValue = WorksheetFunction.VLookup(Sheet2.Range("A" & cnt), Sheet1.Range("A2:A" & I), 1, False)
If lValue <> 0 Then
    Sheet2.Range("C" & cnt).Interior.Color = RGB(255, 255, 0)
    Sheet2.Range("C" & cnt) = Sheet2.Range("A" & cnt).Value
End If
  lValue = 0
Next

End Sub

【问题讨论】：

lValue 应该是一个变体
@Davesexcel：如果你附上解释，那是一个有效的答案。评论是暂时的。您的回答可能会对未来的访客有所帮助:)
做到了，是的，请给出正确答案，以便我选择它，thank you

标签： excel vlookup vba

【解决方案1】：

将 lValue 更改为变体

Dim lValue As variant

【讨论】：