Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

VBA ISERROR & VLOOKUP

Forumthread: VBA ISERROR & VLOOKUP

VBA ISERROR & VLOOKUP
20.06.2005 11:10:30
Stefan
Hallo,
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

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA ISERROR & VLOOKUP
20.06.2005 13:36:53
MichaV
Hi,
das geht m.E. nur "VBA-Intern" :
Cells(x, 14) = "nix da!"
On Error Resume Next
Cells(x, 14) = WorksheetFunction.VLookup(Cells(x, 2), Worksheets("Test").[B:O], 14, 0)
On Error GoTo 0
Gruss- Micha
PS: was soll die 0 in eckigen Klammern?
AW: VBA ISERROR & VLOOKUP
20.06.2005 14:19:48
Stefan
Hi Micha,
danke für deine Antwort. Ich werde es gleichmal testen.
Zu deiner Frage mit der 0 bei Vlookup. Die null steht für falsch, gem. der SVERWEIS Definition wird durch den Paramter falsch der komplette Bereich abgesucht !!!
Danke & Gruß
Stefan
Anzeige
AW: VBA ISERROR & VLOOKUP
20.06.2005 14:21:57
MichaV
Hi,
ja, aber warum schreibst du die in Klammern?
Gruss- Micha
AW: VBA ISERROR & VLOOKUP
24.06.2005 14:30:02
Stefan
...stimmt, dass war mein Fehler. Sorry !!
Gruß
Stefan
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige