Vlookup函数将找不到正确的值

我有一个简单的索引文件，将循环通过500多个文件，并将检索相关信息。 其中一个索引字段是VLookUp ，它引用活动索引工作簿中的另一个工作表。 在testing脚本时， VLookUp函数找不到合适的值，即使手动将相同的公式input单元格时也是如此。 任何想法，为什么这可能会发生（每次返回“N / A”，如ErrorHandling所示）：

 Public Sub UpdateIndex() Dim RowNumber As Integer, LookUpLast As Integer Dim Control As String, PartNumber As String, PartDescription As String, Rev As String Dim LookUp As Range, IndexLookup As Variant Control = "Arbitrary" RowNumber = 2 With ThisWorkbook.Worksheets(Sheet2) LookUpLast = .Range("A" & Rows.Count).End(xlUp).Row Set LookUp = .Range(.Cells(2, 1), .Cells(LookUpLast, 2)) 'Had previously tried Range("A2", "B" & LookUpLast) End With IndexLookup = Application.WorksheetFunction.VLookUp(Control, LookUp, 2, False) With ThisWorkbook.Worksheets(Sheet1) .Range("D" & RowNumber) = IndexLookup End With RowNumber = RowNumber + 1 Next File Exit Sub ErrorHandler: If Err.Number = 1004 Then IndexLookup = "N/A" Resume Next End If End Sub