Bricht mit optionalen Filter erstellen

Computer: Software & Programmierung Microsoft Access
#1

Moin zusammen!
Ich habe ein Formular, welches drei Kontrollkästchen beinhaltet. Nun hätte ich gerne, dass der Anwender in diesen Kästchen auswählt, wie ein Bericht gefiltert wird. Z.B. gibt es ein Haken „Vertragsübernahme“, wenn dieser Haken gesetzt wird, sollen alle Datensätze in einer Abfrage erscheinen, bei denen dieser Wert auf „-1“ steht.

Hat jemand einen Tipp für mich?

Vielen Dank!!

#2

N’abend alleine :smile:

Ich habe ein Formular, welches drei Kontrollkästchen
beinhaltet. Nun hätte ich gerne, dass der Anwender in diesen
Kästchen auswählt, wie ein Bericht gefiltert wird. Z.B. gibt
es ein Haken „Vertragsübernahme“, wenn dieser Haken gesetzt
wird, sollen alle Datensätze in einer Abfrage erscheinen, bei
denen dieser Wert auf „-1“ steht.

watt denn nun, einen Bericht oder eine Abfrage erstellen?

Bei einer Abfrage:
in der Abfrage das Kontrollkästchen als Bedingung für den Wert angeben. WICHTIG: Das Formular muß dafür offen sein! :frowning: aber ( Trick 17) nicht sichtbar sein :smile:

Bei einem Bericht:

  1. Bericht auf Abfrage basierend genau so wie oben verfahren.
  2. Filter per VBA setzen
  3. oder Bericht per VBA (docmd.openreport) mit Filterparametern aufrufen. (würde ich empfehlen)

Grüße aus Essen
Wolfgang

#3

Hallo,

fuer die Loesung deines Problem gibt es bei der DoCmd.OpenReport einen Parameter fuer die Bedingung
Vorrausgesetze die Abfrage deines Reports beinhaltet das Feld Vertragsübernahme dann wuerde das folgendermassen aussehen

if KreusBeiVertragsuenernahme = True then
DoCmd.OpenReport „MeinReport“, acPreview, , „[Vertragsübernahme]= -1“
else
if KreuzBeiAndereBedingung = True
DoCmd.OpenReport „MeinReport“, acPreview, , „[einAndersFeld]= ‚blabla‘“
endif
endif

Das hat vor allem den Vorteil, das man den Bericht von verschiedenen Stellen aus aufrufen kann, da in der zu Grunde liegenden Abfrage kein Bezug zu einem Formularfeld fest verdrahtet ist.

Tschau
Peter

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]