Wert aus Formular an Bericht Textfeld weiterleiten!

[Brallu]

Hallo Gemeinde,
ich habe ein Formular mit einem Kombi-Feld und einer Schaltfläche.

Hier wähle ich eine Jahreszahl aus und dann öffne ich mit dem Button den Bericht. (mit filtern nach dem ausgewählten Jahr)

Code [Auswählen] Erweitern

Private Sub cmdBericht_Click()
     If Not IsNull(Me!cboJahrBericht1) Then
        DoCmd.OpenReport "rptBerAllesMitPrüfung", acViewPreview, , _
                         "(qryBerAllesMitPrüfung.PruefPruefJahr) ='" & Me!cboJahrBericht1 & "'"     
'aus cboJahrBericht1 wird die Jahreszahl an die Abfrage weitergegeben
      DoCmd.Close acForm, "frmBerichte"                                                             'schließen des Auswahlformulars
      Else
        MsgBox "Erst ein Jahr auswählen!", , ""
    End If
End Sub

Jetzt möchte ich noch das die Jahreszahl die ich im Formular ausgewählt habe im Bericht in einem Textfeld angezeigt wird.

Aber ich verstehe nicht wie ich das zweite Kriterium noch in den Code einfügen kann.

(cboJahrBericht1 aus frmBericht soll in txtPruefPruefJahr im Bericht rptBerAllesMitPrüfung)

Ich habe es versucht mit:

Code [Auswählen] Erweitern

Private Sub cmdBericht_Click()
         If Not IsNull(Me!cboJahrBericht1) Then
DoCmd.OpenReport "rptBerAllesMitPrüfung", acViewPreview, , _
"(qryBerAllesMitPrüfung.PruefPruefJahr) ='" & Me!cboJahrBericht1 & "AND" & "[rptBerAllesMitPrüfung]![txtPruefPruefJahr]='" & Me!cboJahrBericht1 & "'"

DoCmd.Close acForm, "frmBerichte"                                                             
      Else
        MsgBox "Erst ein Jahr auswählen!", , ""
    End If
End Sub

Hat jemand eine Idee was ich falsch mache??
Würde mich sehr über eine Antwort freuen.

Gruß
Danny

[Lachtaube]

Und wo drückt jetzt der Schuh?

PS: Warum ist PruefPruefJahr vom Datentyp Text?

[Brallu]

Hallo Lachtaube,
ich habe versucht mit der Tab Taste zu arbeiten da hat er vorzeitig gespeichert.

Habe es gerade ergänzt!! hoffe das ist so verständlich.
TXT weil in der Kopfzeile des Berichts die Jahreszahl so angezeigt werden soll.

[MzKlMu]

Hallo,
das Jahr ist eine Zahl und sollte es auch beleiben. Der Kopfzeile ist egal ob Zahl oder Text.

[Brallu]

Hallo Klaus,
Ist das denn so generell richtig zusammengestellt?? Scheinbar habe ich generell einen Fehler oder Denkfehler drin.
Ich versuche mal weiter!!!

Gruß
Danny

[Beaker s.a.]

Hallo Danny,
Du könntest das Jahr im Paramater "OpenArgs" übergeben und beim
Laden/Öffnen des Berichts das Feld damit befüllen.
gruss ekkehard

[Brallu]

Hallo Leute,
es war mal wieder total einfach
Im Bericht, im Textfeld unter Steuerelemente Inhalt:     =[Formulare]![frmBerichte]![cboJahrBericht1]
und schon klappt es. Obwohl das Auswahlformular geschlossen wird!!!

Ich danke euch für eure Beiträge und wohl bis bald

Gruß
Danny