Juni 26, 2022, 19:00:42

Neuigkeiten:

Ist euer Problem gelöst, dann bitte den Knopf "Thema gelöst" drücken!


Bericht mit filter button

Begonnen von Sleider, April 06, 2022, 09:27:50

⏪ vorheriges - nächstes ⏩

Sleider

Hallo liebe Community,
hab ein kleines Problem.
Ich habe in einen Bericht die Aufträge mit Auftragsdatum drinne.
Für meine Kollegen die sich nicht so sehr mit Access auskennen hab ich einen Button zum Filtern erstelt.
Funktioniert auch...wenn ich das richtige Datum eingebe.
Will ich aber alle sehen die im März sind und gebe zb März ein funktioniert es nicht.

vba code sieht so aus:

Option Compare Database
Private Sub Befehl1239_Click()
DoCmd.OpenReport "01 Auftragsformular", View:=acViewPreview
End Sub


Private Sub Befehl367_Click()
' für den ersten Button
    Dim x As String
    x = InputBox("Bitte Monat eingeben")
    Me.Filter = "[Aufträge.Auftrag vom]like'" & x & "'"
    Me.FilterOn = True
 
End Sub

Private Sub Befehl37_Click()

End Sub

MzKlMu

April 06, 2022, 11:01:06 #1 Letzte Bearbeitung: April 06, 2022, 13:49:22 von MzKlMu
Hallo,
das Vorhaben ist fragwürdig. Man legt in einem Bericht keine Buttons an, zumal diese in der Seitenansicht eines Berichts nicht funktionieren.
Zu diesem Zweck schaltet man ein Formular vor, in dem die Filter bestimmt werden und der Bericht wird gleich gefiltert geöffnet.

Auf den Monat filtert man so:
Me.Filter = "Month([Auftrag vom]) = " & x Wobei Du dann natürlich den entsprechenden Monat von jedem Jahr angezeigt bekommst.
Zum Monat gehört daher auch zwangläufig das Jahr hinzu.
Zitat von: undefinedFunktioniert auch...wenn ich das richtige Datum eingebe.
Zeige mal den Code dazu.

Wieso nennst Du einen Bericht eigentlich "01 Auftragsformular"?
Oder druckst Du gar das Formular ?
Gruß
Klaus