我一直無法弄清楚我的腳本有什麼問題,因爲它似乎並不難,所以我希望我能在這裏找到答案。Vlookup + Iberror in VBA error「1004」
我有兩張紙(Sheet1和Sheet2),其中兩張都是隨時間變化的列表(Sheet1中的信息每次都在Sheet2中獲取)。我想爲Sheet1中的每一行運行vlookup函數,並在sheet2中不存在條目時返回「new」(第28列)。
代碼有些問題,因爲我一直得到1004錯誤關於iferror & vlookup函數。
由於提前,
Sub vlookup_iferror()
Dim i As Integer
Dim finalrow As Integer
finalrow = Sheets("Sheet1").Range("A100000").End(xlUp).Row
For i = 2 To finalrow
Cells(i, 28) = Application.IfError(Application.VLookup(Sheets("Sheet1").Range("i, 2"), Sheets("Sheet2").Range("B:B"), 1, False), "New")
Next i
End sub
正確的語法是Application.WorksheetFunction.IFERROR()等。不知道爲什麼你要這樣做,而不是使用.Range()。Find(),因爲它需要更長的時間..此外,如果你試圖動態地找到最後一行,如Sheets(1).Cells(Sheets(1).Rows.Count,1).End(xlUp).Row可能會更好。 – Tyeler