Laufzetfehler in VLookup Zeile
09.10.2015 21:07:22
Peter
ich bitte um Eure Hilfe. Ich erhalte einen Laufzeitfehler 1004 in der Vlookup Zeile.
Könntet ihr mir bitte bei der Syntax helfen.
With Sheets("Tabelle1")
lz1 = .Cells(Rows.Count, 2).End(xlUp).Row 'letzte Zeile In Tabelle 1 _
bestimmen
lz2 = Cells(Rows.Count, 2).End(xlUp).Row 'letzte Zeile bestimmen
lz3 = Cells(Rows.Count, 3).End(xlUp).Row 'letzte Zeile bestimmen
For i = lz3 + 1 To lz2
Cells(lz3 + 1, 3) = Application.WorksheetFunction.VLookup(Cells(lz3 + 1, 2).Range(.Cells(7, _
2), .Cells(lz1, 3)), 2, 0)
Next i
End With
Danke und LG,Peter