VBA ISERROR & VLOOKUP
20.06.2005 11:10:30
Stefan
ich habe ein kleines problem mit einem makro.
über die funktion worksheet
Function verwende ich vlookup. nun wollt ich noch die NV fehlermeldungen abfangen, aber leider klappt das nicht. vielleicht hat jemand eine idee:
anbei das makro ohne meinen versuch ISNA einzubauen
Sub Sverweis_test()
Dim x As Integer
Dim wks As Worksheet
Set wks = Worksheets("Service")
Range("N2:N2999").Select
Selection.ClearContents
Range("N2").Select
x = 2
Do Until x = 2999
wks.Cells(x, 14) =
WorksheetFunction.WorksheetFunction.WorksheetFunction.VLookup(Cells(x, 2),
Worksheets("Test").[B:O], 14, [0])
x = x + 1
Loop
End Sub