Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1496to1500
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

sverweis #NV

sverweis #NV
31.05.2016 22:36:58
stef26
Guten Abend,
ich hab da mal eine Frage.
Ich versuche einen Sverweis in VBA zu realisieren.
            Stunden = Application.VLookup(Arbeitsplatz, .Range(.Cells(1, 1), .Cells(500, 8)),   _
_
TagNr + 1, False)
Einzelauftragszeit = Application.VLookup(Arbeitsplatz, .Range(.Cells(1, 1), .Cells(  _
_
500, 8)), TagNr + 8, False)
If Err.Number > 0 Then
Stunden = 0
Einzelauftragszeit = 0
End If

Mit If Err.Number... versuche ich den Fehler abzufangen, der entsteht, wenn der SVERWEIS kein Ergebnis findet.
Leider funktioniert das Abfangen des Fehlers nicht.
Wer kann mir sagen was ich falsch mache ?
Gruß
Stefan

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

Betreff
Datum
Anwender
Anzeige
AW: sverweis #NV
31.05.2016 23:05:22
Martin
Hallo Stefan,
du musst ein "On Error Resume Next" über die Application.VLookup-Zeile schreiben, danach kannst du den Fehler mit Err.Number auswerten.
Viele Grüße
Martin

AW: sverweis #NV
31.05.2016 23:14:19
stef26
Hallo Martin,
besten Dank. Man lernt nicht aus.
DANKE
:-)
Stefan

AW:sollte reichen...
01.06.2016 06:52:15
hary
Moin
...wenn du WennFehler davor setzt?
Stunden = Application.IfError(Application.VLookup(Arbeitsplatz, .Range(.Cells(1, 1), .Cells(500, 8)), TagNr + 1, False), 0)

gruss hary

AW: AW:sollte reichen...
01.06.2016 11:37:42
Fennek
Hallo Stefan,
warum nutzt du nicht "Range.find", nach etwas Gewöhnung kann man so auch mehrere Treffen gut kontrollieren.
mfg
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige