PDA

Vollständige Version anzeigen : Übergabe von 2 Felder an einen Bericht


m3
15.10.2001, 13:18
Hallo Leute,
ich hab da ein Problem.
ich will 2 Felder (MNr und Datum) an einen Bericht übergeben.
Nachdem ich auf eine Schaltfläche klicke sollen nur die Datensätze von
z.B. Volker Biller am 12.10.2001 angezeigt werden.

Könnte mir bitte jemand von Euch helfen.

Danke im voraus

M3

Kurt aus Kienitz
15.10.2001, 13:53
Hallo,

Was hast Du denn bis jetzt fertig, die Schaltfläche ?

Wenn ja, dann müsste in der Ereignisprozedur Beim Klick der Schaltfläche irgendwo das Kommando DoCmd.OpenReport auftauchen.
Bei diesem Kommando kann man (als 2. oder 3. Parameter) eine Bedingung übergeben, mit die zu verwendenden Daten eingeschränkt werden.

Das könnte bei Dir ungefähr so aussehen:

Privte Sub Schaltflaeche1_Click()

DoCmd.OpenReport "BerichtName",vbPreview,"[MNr]=" & Str$(Me.MNr) & " AND [Datum]=#" &_
Format(Me.Datum,"YYYY-MM-DD") & "#"

End Sub

Dabei sind Me.MNr und Me.Datum Textfelder auf dem Formular, auf dem sich auch die Schaltfläche befindet.
HTH

m3
15.10.2001, 15:43
Hallo Kurt aus Kienitz,
danke für Deine mühe, aber wenn ich den Code so in der Schaltflächenprozedur einfüge zeigt mir der Bericht alle anderen Berichte von allen Mitarbeitern an.
Eine Kollegin hat es dann nachdem sie deinen Code gesehen hat wie folgtgemacht:

Private Sub Monatsbericht_Click()
On Error GoTo Err_Monatsbericht_Click

Dim stDocName As String
Dim strFilter As String

stDocName = "Mitarbeiter"
strFilter = "MNr =Forms!Übersicht!MNr"
DoCmd.OpenReport stDocName, acViewPreview, strFilter, "Datum = Forms!Übersicht!txtDatum"

Aber das der Bericht nur den Mitarbeiter mit dem ausgesuchten Datum anzeigt funktioniert immer noch nicht.

Also herzlichen Dank für Deine mühen und bis zum nächsten mal.

M3
Manfred Bauer

Kurt aus Kienitz
15.10.2001, 17:52
Hallo nochmal,

Wenn die Variable strFilter um das Datum erweitert wird, sollte es eigentlich klappen.