Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1220to1224
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

VLookup

VLookup
UweD
Hallo
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

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

Betreff
Benutzer
Anzeige
und .offset()
29.06.2011 19:10:00
Matthias
Hallo
Such doch einfach nach der Lieferantennummer in Spalte(A) und benutze dann .Offset()
Userbild
AW: VLookup
29.06.2011 19:12:29
Uduuh
Hallo,
die Inputbox liefert immer einen String. Vllt. liegt's daran.
Gruß aus’m Pott
Udo

Der Fehler ist, -> das nicht referenzierte Blatt
29.06.2011 19:26:40
Matthias
Hallo
Im Beispiel ist das entsprechende Blatt das aktive Blatt
Option Explicit
Sub test()
Dim Liefnum&, Liefnam$
Liefnum = CLng(InputBox("Lieferantennummer", "Lieferant", "5000690"))
Liefnam = Application.WorksheetFunction.VLookup(Liefnum, ThisWorkbook.ActiveSheet.Range( _
"Lieferanten"), 4, 0)
MsgBox Liefnam
End Sub
Bsp: https://www.herber.de/bbs/user/75512.xls
Userbild
Anzeige
da ist aber noch keine Fehlerroutine drin ! oT
29.06.2011 19:29:02
Matthias

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige