Hallo, Moeller67!
Ich habe ein Formular in dem folgende Felder gefüllt werden
müssen:
Typ
Kilometer (KM)
Laufzeit
nun muß er mir aus diesen Abfrageparametern aus einer Tabelle
einen Wert (Faktor) ausgeben.
Diese Tabelle sieht so aus:
Typ KM Laufzeit39 Laufzeit48 Laufzeit54 Laufzeit60
2361 1200 1,6 1,8 1,9 2,1
2361 1600 1,65 1,85 2 2,2
2361 2000 1,7 1,9 2,1 2,3
2650 1200 1,5 1,55 1,59 1,6
2650 1800 1,6 1,8 1,95 2,55
2780 1200 usw. usw.
Pre-Tags machen hier das Lesen leichter 
Jetzt das kniffelige Beispiel, da bei dazwischenliegenden
Kilometerzahlen der niedrigere Wert genommen werden soll:
Typ 2361
Laufzeit 48
Kilometer 800
= hier muß der Faktor 1,8 herauskommen
Wer kann mir helfen und wie kann ich das umsetzen?
VBA kann ich ein bißchen.
Wie hättest Du es denn gerne?
Entweder suchst Du Dir per VBA und DMax zuerst den maximalen km-Wert aus der Tabelle, bei der der Typ entsprechend gesetzt ist, und der kleiner oder gleich der eingegebenen km sind. Dann kannst Du Dir das entsprechende Feld aus der Tabelle lesen, bei der Typ=Eingabe und km=der eben berechnete Wert sind.
Oder Du haust Dir alles in ein Statement zusammen:
Ich gehe davon aus, dass Deine Tabelle „tblFaktoren“ heißt, alle Felder vom Typ Zahl sind, Du ein Formular mit den Textfeldern txtKm, txtTyp und txtLaufzeit hast, diese ebenfalls alle Zahlen beinhalten und keine Fehlerabfangroutine (z. B. bei Eingabe nicht existenter Felder für Laufzeit) vorhanden ist. Dann kriegst Du mit
Nz(DLookup("Laufzeit" & Me.txtLaufzeit, "tblFaktoren", "((Typ=" & Me.txtTyp & ") AND (km In (select max(km) as mkm from tblFaktoren where km
den Wert in einem einzigen Statement raus.
Gruß, Manfred
