Office: (Office 2013) Textfeld in Bericht Werte aus Abfrage zuweisen

Hallo zusammen,

ich würde gerne in einem Bericht einem ungebundenen Textfeld "Nachfrage" Werte aus der Abfrage "NachfrageTeilTag" zuweisen in Abhängigkeit von den Feldern "Teilenummer" und "Tag". Diese befinden sich im Bericht und werden berechnet (Tag) oder aus einer anderen Abfrage gezogen (TeileProKunde).

Ein Pseudo SQL-Code zum besseren Verständnis:
Code:

Bisher habe ich es mit einer verschachtelten WENN-Funktion in der Steuerelement-Inhalt-Eigenschaft versucht - leider ohne Erfolg (Ich werde nach dem Parameter DemandTypeDay gefragt):
Code:

Hat jemand eine Ahnung wie das funktioniert?


Darüber hinaus, aber eher zweitrangig werden Parameter für den Bericht über ein Formular übergeben (Zeitraum). Das funktioniert soweit alles wunderbar, allerdings muss ich das Formularfenster immer manuell schließen, wenn ich
Code:

im Report_Open Ereignis ablege, wird das Formular geschlossen bevor bestimmte Felder im Bericht die Parameter übernommen haben (Fehlermeldung #Name?)
Kennt jmd zufällig ein Ereignis was bei jedem Öffnen eines Berichtes eintritt, allerdings erst nachdem die Textfelder des Berichts Werte ziehen? Ausprobiert habe ich bereits alles mögliche unter anderem Detaillbereich_Form - im Moment lasse ich den Befehl über das Detaillbereich_Click Event ausführen, funktioniert zwar, ist aber sicherlich nicht die edle Variante.


Ich bin für jede Hilfe dankbar,
LG

:)

 

Hallo,
den Wert für das ungebundene Feld kannst du über ein DLookup auf die Abfrage ermitteln, die Felder aus dem Bericht sind dann im Kriterium anzugeben.
Die Zuweisung per DLookup im Ereignis beim Formatieren des entsprechenden Berichtsbereichs.

Zu der zweiten Geschichte: Wieso übergibst du die Parameter nicht per OpenArgs aus dem Formular an den Bericht, dann kannst du das Form direkt nach dem Öffnen des Berichts schließen.
Also nicht "Werte ziehen", sondern "Werte schieben".

maike

 

Vielen Dank,

ich werde mich mal rein lesen.

zu der anderen Geschichte, habe ich versucht allerdings konnte der Wert nicht zugewiesen werden mit Me!Anfangsdatum = xxx

Habe immer die Fehlermeldung bekommen das dem Feld kein Wert zugewiesen werden kann (Laufzeitfehler 2448) also hab ich es über die billige Variante gemacht.

Hier der Code dazu im Bericht, Roter Bereich gibt Fehler:
Code:

und im Formular:

Code:

 

Wert wie gesagt zuweisen beim Formatieren des Bereichs, wo das Feld sich befindet, im Open-Ereignis ist es vermutlich zu früh.
Die Schleife über die Felder dann auch da hin.
maike

 

Habe den Code wie folgt verschoben:

Code:

Allerdings scheint das Event Detaillbereich_Format überhaupt nicht einzutreffen da die MsgBox nicht angezeigt wird.

Was mache ich falsch?

 

Hallo,

wie Maike schon schreibt, das Open-Ereignis ist wohl zu früh und damit die Variable DatStart noch nicht initialisiert. Versuch mal
Code:

btw es wird in deinem Code nur x als Integer behandelt, i wäre ein Variant.

 

Danke für deine Antwort,

habe jetzt den gesamten Code in Detailbereich_Format gepackt, und den "Test" auf MsgBox "Hallo" abgeändert - es erscheint allerdings immernoch nicht mal
eine MsgBox

 

Die Variablen DatStart und DatEnde sind in der Prozedur im Detailbereich nicht bekannt (es hilft nicht, wenn du die Prozeduren als Public deklarierst), verlege das Splitten der OpenArgs auch noch dort hin.
Wie testest du denn, in der Entwurfs- oder Layoutansicht? Gibt es überhaupt Daten im Detailbereich?
maike

 

Habe ich gemacht, der komplette Prozess liegt jetzt im Detailbereich_Format, die Tatsache das bei der Zeile "MsgBox "Hallo"" nichts passiert zeigt, nach meinem Verständnis das das Ereignis das Problem ist bzw. der Eintritt des Ereignisses...

Ich teste indem ich den Bericht öffne wie es später der Anwender tun wird

 

Hm, dann sollte das Ereignis eintreten, vorausgesetzt wohl, der Detailbereich enthält Felder und Daten. Ist das so?
maike

 

Ja, Detaillbereich ist vollgepackt mit Informationen, hab das ganze mal in den Berichtskopf_Format und Seitenkopf_Format gepackt, tritt auch nicht ein obwohl widerum beide Daten beinhalten

 

Da fällt mir grad nur die Möglichkeit ein: Guck mal unter den Eigenschaften des Berichts/Ereignis - ist da beim entsprechenden Ereignis auch "Ereignisprozedur" ausgewählt?
maike

 

Nachtrag: Bist du ganz sicher, dass du den Bericht in der Berichtsvorschau geöffnet hast und nicht in einer der anderen Ansichten?
maike

 

Hi maikek,
habe im DoCmd.OpenReport Befehl die Anzeige auf Preview statt Report umgestellt, jetzt funktioniert es... aber das ist sozusagen die Druckansicht, ist es nicht möglich das ganze in der normalen Berichtsansicht eintreten zu lassen?!


Edit: Hat sich erledigt, das Report_Load() Ereignis sorgt für den gewünschten Effekt, vielen Dank für eure Hilfe!

 

Bezüglich dem eigentlichen Problem, habe ich mich an den DLookUp Code gemacht, dieser soll letztlich auch in die for-Schleife integriert werden, dabei tritt der Laufzeitfehler 13: Datentypen unverträglich auf:

b ist dabei als String deklariert und i ist ein Integer welcher "durchzählt"

Code:

das seltsame ist, wenn ich stattdessen:

Code:

die Variable b welche die Tagesfelder durchzählen soll, ein festes Tagesfeld (in diesem Beispiel "d1") eintrage erhalte ich den Fehler nicht?!