Seltsames Problem mit VLookup
08.04.2005 16:39:09
Fabian
ich quäle mich nun schon seit Stunden mit diesem eigenartigen Problem, aber ich verstehe es einfach nicht. Folgendes:
Dim PerZ As Long
Dim NebK As Long
Dim KosL As Range
PerZ = TextBox1.Value
Set KosL = Worksheets("Daten").Range("A5:B11")
NebK = Application.WorksheetFunction.VLookup(PerZ, KosL, 2)
TextBox3.Value = NebK
Der niedrigste Wert in der durchsuchten Range ist 30, der höchste 140. Der Benutzer gibt einen Wert in die TextBox1 ein. Wenn dieser Wert größer als 140 ist, verhält Excel sich so wie ich es erwarten würde und nimmt den nächstliegenden Wert (also so als ob 140 eingegeben worden wäre). Wenn der eingegebene Wert aber kleiner als 30 ist bekomme ich statt des nächstliegenden Wertes folgende Fehlermeldung:
Die VLookup-Eigenschaft des WorksheetFunction-Objektes kann nicht zugeordnet werden. (Laufzeitfehler '1004')
Ich verstehe es einfach nicht (*haarerauf*), vielleicht hat ja hier jemand den entscheidenden Tip für mich. :)
Vielen Dank im Voraus
Fabian