Office: (Office 2010) DLookup und Endlosformular

Hallo,

in einem Endlosformular, das in einem Hauptformular als Unterformular eingebunden ist, zeigt das ungebundene Textfeld in jedem Datensatz den gleichen Wert an. Der Wert wird per Code mit integriertem DLookup übermittelt.

Es handelt sich um den Code aus meinem Thema "Richtigen Wert zurückgeben", #23, der in allen Hauptformular-Anwendungen problemlos funktioniert. Den Code habe ich entsprechend an das Unterformular angepasst. Er funktioniert auch hier problemlos, bis auf die Rückgabe der gleichen Werte eben. Es ist seltsam, dass es zu KEINER Fehlermeldung dabei kommt.

Weiß jemand zu diesem Problem einen Rat?
Danke im Voraus.

Viele Grüße
Euer Alexander

:)

 

Hallo,
wenn es in der DLookup Formel keinen Bezug zum aktuellen Datensatz gibt, sind die angezeigten Werte eines ungebunden Feldes logischerweise alle gleich. Das ist kein Fehler. Den Fehler machst Du in Deiner Logik.

Zeige mal den kompletten Code mit dem DLookup den Du aktuell verwendest.

 

Hallo Klaus,

so, hier ist der Code:
Code:

 

Versuche doch mal, uns zu erklären, was dieser Code bewirken soll.
Was genau wird da ermittelt und (aus dem HF hetaus) einem Steuerelement im UF zugewiesen?

 

Hallo
Nur so
hat sicher nichts mit Deinem Problem zu tun !
ist nur unschön nicht so gut
weist du wenn Du Dein Feld x so Definierst

Dim x

was für einen Daten Tip x hat ?

Besser währe z.B. so

Dim x as String

 

Hallo,

@ Anne: Ist die gleiche Problematik, wie in meinem Thema "Richtigen Wert zurückgeben", also eine datumsabhängige Wertrückgabe. nur kommt in diesem Fall erschwerend dazu, dass die Werte nicht in ein Hauptformular (frmBestellungen), sondern in dessen Unterformular (frmBestellpositionen) zurückgegeben werden sollen.

@ Ruedi: Habe ich aus dem Thema "Richtigen Wert zurückgeben" #23 übernommen, statt eines "vi" habe ich ein "x" genommen.

Bis dann
Euer Alexander

 

Um die Erklärung (=genaue Beschreibung) der Zusammenhänge kommst du nicht herum.
Der Verweis auf den anderen Thread hilft da auch nicht weiter.

Was bezweckst du mit der Berechnung? Und warum wunderst du dich, dass in allen Datensätzen
derselbe Wert erscheint, wenn die Berechnung allein auf Datenfeldern des Hauptformulars basiert
und nicht datensatzweise im Unterformular stattfindet?

PS:
Wie lautet die Datenherkunft von Haupt- und Unterformular?
In welcher Beziehung stehen die Formulare zueinander?

 

Klaus hat dir ganz zu Anfang schon die Antwort gegeben: Es gibt keinen Bezug zum jeweiligen Datensatz im Endlosformular.

DLookup gibt die erste gefundenene TDet_MengEinhIDRef aus der Tabelle an x und du suchst dann wieder die erste x entsprechende MengEinh_ID heraus und zwar unabhängig vom DS.

Welche Informationen/Werte in den einzelnen Datensätzen des Endlosformulars geben einen Hinweis auf das zugehörige MengEinh_EinhZeich bzw. MengEinh_ID? Die müssen mit in das Kriterium für DLookup hinein.

maike

 

Hallo
Da Du ja sagst das Du meine Doc nicht öffnen kannst
Versuche es doch noch einmal ich habe noch nie gehört das man die zip-Datei nicht öffnen kann,
zip runterladen und öffnen dann die
pdf Datei "ACCESS 2000BU Begleitunterlagen.pdf" mit Adobe Reader öffnen !

Hast Du ein "Adobe Reader" ? sonst GRATI bei Adobe runterladen *wink.gif*

hier ein Bsp mit einigen Erklärungen evtl. bringt das Dich auf die Antwort meiner Frage:
Code:

Das Beispiel oben ist falsch,
da so nur die letzte Variable als String deklariert ist
und die ersten zwei Variablen werden als Variant deklariert.

ps.
auch wenn Du etwas Abschreibst solltes Du am Ende wissen
was in Deinem Code geschieht!

 

Hallo,

habe eben noch schnell eine Datenbank als Beispiel erstellt.

Darin ist im Unterformular frmBestellpositionen (dazu das Hauptformular frmBestellungen öffnen) zu sehen, dass alle angezeigten Mengeneinheiten zu den Teilen gleich sind.
Die Teile selbst sind im Hauptformular frmTeilestamm eingepflegt und im Unterformular frmTeiledetails befinden sich die dazugehörigen Mengeneinheiten mit dem entsprechenden Gültigkeitsdatum.

Eröffne ich in frmBestellungen eine Bestellung mit einem Bestelldatum und wähle in frmBestellpositionen die Teile aus, soll zu diesen Teilen die zum Bestelldatum passende Mengeneinheit angezeigt werden.

Schönen Abend
Euer Alexander

 

Hallo
kannst Du das als MDB (Access 2003) gezipt
hoch Laden

 

Also müssen doch die Mengeneinheiten im Unterformular jeweils pro Datensatz (=Bestellposition) neu ermittelt werden.
Wie kommst du darauf, diese Berechnung aus dem Hauptformular heraus steuern zu können/wollen/müssen?!

 

Hallo,

@ Ruedi: Kann ich erst heute Abend posten.

@ Anne:

Keine Ahnung - meinst Du, es wäre besser, dies aus dem Unterformular steuern zu lassen?

Bis dann
Euer Alexander

 

Ja, natürlich. Wie sonst willst du die TSt_IDRef des aktuellen Datensatzes aus dem Ufo da mit rein bringen?!

Erstelle eine Abfrage mit "tblTeileDetails" und "tblMengeneinheiten" und den beiden Feldern "TDet_TStIDRef" und "MengEinh_EinhZeich".
Dann kannst du im Steuerelementinhalt des Textfeldes im Ufo mit Hilfe der DLookUp-Methode darauf zugreifen: Code:

Nachtrag:
Vermeidung von #Fehler im neuen Datensatz: Code:

 

Hallo Anne,

erstmal vielen Dank für Dein Engagement!

Ich habe das so angewendet, die Teile bekommen jetzt tatsächlich ihre eigenen Mengeneinheiten.
Nur ein Problem bleibt: Die Mengeneinheiten unterscheiden sich nicht zwischen den Bestellungen, obwohl die Bestellungen verschiedene Daten aufweisen, siehe Best_BestDat.

Ich weiß nicht genau, ob es daher kommt: In Deiner Formel steht DomWert. Ich habe versucht, es in DLookup zu ändern, aber es wird nicht angenommen, springt nach Betätigung der Enter-Taste immer in DomWert um. Auch eine Änderung der Formel in Word und das Einfügen der gesamten, geänderten Formel zurück in Access bringt keine Besserung. In VBA konnte ich das nicht beobachten.

Viele Grüße
Euer Alexander