Supportnet / Forum / Datenbanken
DLookUp-Funktion
Frage
ich brauche dringend eure geschätzte hilfe. ich habe folgende funktion eingebaut:
faktor = DLookup("[wert]", "test_tabelle2", "[jahre_1] = txt_diff_1_2 And [jahre_2] = txt_diff_2_2")
der felddatentyp der in der tabelle vorhandenen felder (wert / jahre_1 / jahre_2) ist 'zahl'. (sofern das überhaupt eine rolle spielt)
txt_diff_1_2 und txt_diff_2_2 werden im code direkt ermittelt; verweisen also nicht auf ein formular oder eine tabelle. diese sehen wie folgt aus:
txt_diff_1_2 = Round(DateDiff(("m"), Forms![frm_ber_haupt]![txt_dat_1], Forms![frm_ber_haupt]![txt_dat_2]) / 12, 5)
txt_diff_2_2 = Round(DateDiff(("m"), Forms![frm_ber_haupt]![txt_dat_1], Forms![frm_ber_haupt]![txt_dat_3]) / 12, 5)
will ich das ganze nun starten, kommt folgende meldung: laufzeitfehler '2471'..... das objekt enthält nicht das automatisierungsobjekt txt_diff_1_2...
beim debuggen ist ersichtlich, dass txt_diff_1_2 und txt_diff_2_2 gerechnet wurden, nur funktioniert aber das ganze nicht. (faktor = 0)
was um alles in der welt habe ich falsch gemacht???
danke schon im voraus für eure prompte hilfe!!
Antwort 1 von Teddy7
Versuch´s mal so:
dim suche as string
suche = "jahre_1 = " & txt_diff_1_2 & " And jahre_2 = " & txt_diff_2_2
faktor = DLookup ("wert", "test_tabelle2", suche)
Gruß
Teddy
dim suche as string
suche = "jahre_1 = " & txt_diff_1_2 & " And jahre_2 = " & txt_diff_2_2
faktor = DLookup ("wert", "test_tabelle2", suche)
Gruß
Teddy
Antwort 2 von pat2000
geht leider auch nicht. diesmal sagt er, dass das automatisierungsobjekt 'suche' nicht gefunden werden kann... hast du sonst noch ne idee?
gruss
pat
gruss
pat
Antwort 3 von Teddy7
hast Du einen Verweis auf Microsoft DAO gesetzt ?
(im Codefenster -> Extras - Verweise)
Gruß
Teddy
(im Codefenster -> Extras - Verweise)
Gruß
Teddy
Antwort 4 von pat2000
ja, ist drin...
gruss
pat
gruss
pat
Antwort 5 von Teddy7
Jetzt zeigt meine Kristallkugel nur noch Nebel.
Wenn Du willst kannst Du mir die Datenbank ja mal zumailen (in A97 oder in A2000 und bitte gezipt) - vielleicht fällt mir ja was auf.
Gruß
Teddy
Wenn Du willst kannst Du mir die Datenbank ja mal zumailen (in A97 oder in A2000 und bitte gezipt) - vielleicht fällt mir ja was auf.
Gruß
Teddy

