VLookup
UweD
ich stehe vor dem Problem den Sverweis mit vba auszuführen.
- Ich lese per Inputbox eine Lieferantennummer ein.
- In der Tabelle "Lieferanten" stehen die entsprechenden Daten
- Für die Spalten A:E wurde der Name "Lieferanten" festgelegt
Als Rückgabe erwarte ich den LieferantenNamen aus Spalte D
LIFNR UNT.LFR MATCH1 NAME 1 ORT
5.000.100 -- Firma1 FirmaName1 dort
5.000.190 -- Firma2 FirmaName2 hier
5.000.690 -- Firma3 FirmaName3 nirgendwo
5.000.230 -- Firma4 FirmaName4 überall
der code sieht so aus:
Dim Liefnum&, Liefnam$
Liefnum = InputBox("Lieferantennummer", "Lieferant", "")
Liefnam = WorksheetFunction.VLookup(Liefnum, ThisWorkbook.Range("Lieferanten"), 4, 0)
Als Fehlermeldung kommt:
Laufzeitfehler 438
Objekt unterstützt diese Eigenschaft oder Methode nicht
wer kann mir helfen?
Danke im Voraus
Uwe