Office: (Office 2007) Bericht mit Filter öffnen VBA

Hallo zusammen,

ich bräuchte bitte nochmal eine kleine Code-Hilfestellung, komme grad nicht wirklich weiter.

Geht darum aus einem Formular heraus dass in eine Tabelle Daten einträgt per Button einen Bericht zu öffnen der nach diesen Daten gefiltert wird.

Genauer gesagt:

Tabelle Rechnungen: ID | PersID | Rechnungspräfix | Rechnungsnummer | Rechnungsdatum | Rechnungszeitraum | RechungszrJahr | bezahlt

(fett=Filterkriterium)

Sinn der Sache ist folgender: PersID steht für Personen die Rechnungen ausgestellt haben und einen gewissen Anteil davon wieder abführen müssen. Grundlage dieses Berichtes ist nun eine Abfrage die alle gestellten Rechnungen der Person zusammensortiert (die haben immer eine Kategorie, daraus schlüsselt sich dann wieviel zu bezahlen ist).
Das muss jetzt natürlich nach den kriterien oben genannter Tabelle gefiltert werden.

Also z.b. Person 1 bekommt Rechnung nr. 2009001 die z.b. den Monat März (03) im Jahr 2009 beinhaltet.
Nun habe ich schon mal das Problem wie ich den Monat filtern kann, aber ich weiss dass es irgendwie ging.. nur wie halt *Smilie

Grundlage für den Rechnungsbutton ist dieser Code bis jetzt (von einem anderen Formular übernommen, daher unvollständig und nicht ganz passend *g)

Code:

Dim repnam As String
repnam = "Rechnung"
DoCmd.OpenReport repnam, , , "[Rechnungen].RechnungsID =" & Me!RechnungsID

[trace]250964[/trace]

 

Hallo
wie würde der wher ausehen wenn Du das in eier Abfrage machst ?
mach eine Abfrage die diese DS selectiert
alles auser dem WEHR hängst Du in die Kriterien beim öffnen (Open) aufruf (DoCmd.OpenReport repnam, , , ......)

zb.
(((TblF.xDatum)>=#03/01/2009# And (TblF.Datum)

 

Hallo
noch was
Erster - Letzter Tag ......

Jezt/Now, Date ersetzen Durch Dein Datum

 

Hmm, ich komm mit dem WHERE nicht ganz klar. Meinst du damit diesen SQL Text? (da steht kein where drin...)

Direkt nach Monat auflösen geht wohl nicht? (ich hab das sowas mit der Datum funktion im Hinterkopf, nur komm ich nicht drauf bzw. finde es nicht...)

 

Hallo,

wenn du alle Rechnungen einer Person auflisten willst, dann musst du wohl nach PersID filtern und nicht nach RechnungsID. *rolleyes.gif*

Was darf man sich denn unter den Tabellenfeldern Rechnungszeitraum und RechungszrJahr vorstellen, lassen sich diese Informationen nicht aus dem Rechnungsdatum ableiten?

Ehe die Details nicht stimmig und klar sind, kann man dir schwerlich einen Vorschlag machen.

PS:
Um ein Datum nach Monat/Jahr auszuwerten, kann man die Format-Funktion einsetzen oder Month() bzw. Year().

 

Ich glaube du hast da was durcheinandergebracht, oben war nur eine Auflistung der Tabelle, das hatte jetzt noch nicht wirklich was mit den Filtern zu tun. Nur um zu zeigen welche Daten als Grundlage herhalten.

Klar, als erstes nach PersID filtern, dann nach dem Zeitraum (Monat/Jahr).
Den kann man natürlich auch in ein Feld packen, ich hatte das Einfachheit halber mal so hingebaut damit man es schnell eingeben kann (Jahr hat Standartwert 2009 und Monat ist ein Kombifeld mit Monatsnamen dass Zahlen von 01 bis 12 abspeichert).

Ich hab halt einfach noch nicht so recht verstanden wie man diese ganzen Filterkriterien in einen Code verfrachtet. Bei einem gehts ja, nur bei mehreren streikt mein Hirn *Smilie

 

wie?...ääääh *gg
Steh wohl grad etwas auf dem schlauch *Smilie

Wenn ich mir deinen Code so ansehe... das Me! bezieht sich doch auf das aktive Formular oder verwechsle ich da grade was?

Vom Filtern her reichen PersID, Monat und Jahr aus. Alles was nicht da reinpasst soll der Bericht einfach weglassen.

 

Ja, ich dachte der Berichtsaufruf und die Vorgaben zum Filtern kämen aus einem Formular.

Ich fragte nach den Datenfeldern, damit sind die Spalten der Tabelle Rechnungen gemeint. Was soll da nach Monat und Jahr gefiltert werden?

 

in der Tabelle gar nichts, das Zeug was die Abfrage rauswirft gehört gefiltert. In dieser Rechnungstabelle (Feld für Monat / Jahr) steht ja nur was der Filter machen soll.

Hier mal mit Bilders, eventuell isses dann verständlicher:

Man beginnt mit diesem Formular:





das schreibt dann in die Tabelle:





so, auf diesen Daten basierend wird nun ein Bericht geöffnet der danach gefiltert werden soll.
Der Bericht basiert auf folgender Abfrage die sich eben die benötigten Daten aus einer anderen Tabellen zusammensucht etc.





Hier kommts halt darauf an nach Arzt Nummer und Behandlungsdatum zu filtern damit nachher die Rechnung für den entsprechenden Monat auch stimmt *Smilie

 

Geht das auch eine Nummer kleiner mit den Bildern? *rolleyes.gif*

Ob der Bericht nun auf einer Tabelle oder auf einer Abfrage basiert - es handelt sich letztendlich doch wohl um Datenfelder, die da in den Bericht einfließen.

Letzter Versuch: WELCHE Spalte(n) aus der Datenherkunft des Berichts soll(en) WIE gefiltert werden?

 

Wenn ich so drüber nachdenke ist es wohl sinnvoller direkt mit den Sachen die Aktuell im Formular aktiv sind zu filtern....

Jedenfalls

[Arztrechnung Abfrage].Arzt filtern nach Formularfeld (Arztrechnung erstellen) "Rechnungsempfänger"

[Arztrechnung Abfrage].Behandlung filtern nach Formularfeld "Monat" und "Jahr"

das würde im Grunde ausreichen.
Hoffentlich hab ich dich jetzt richtig verstanden... *peinlich

 

Eigentlich solltest du das nun auch selbst umsetzen können (apropos "peinlich")...

So wird aus Code:

möglicherweise Code:

 

1. Vielen Dank für die Geduld *Smilie

2. Manchmal muss man Dinge erst sehen bis einem die Tomaten von den Augen fallen... *wirklichpeinlich...