Office: (Office 2010) Bericht fürs Durcken einen Filter und Sortierung mitgeben

Hi,

ich habe folgendes Problem:

Ich öffne einen Bericht zum Drucken und will dem eine Filterung und eine Sortierung mitgeben.
Beides lese ich aus einem Bericht aus.

Diese funktioniert auch (gibt mir die Infos mit der msgbox zurück) und er übernimmt die Filterung, nicht aber die Sortierung.

Was mache ich falsch?

Hier mein Code:
Code:

Vielen Dank für eure Hilfe

:)

 

Hallo,

du musst in Gruppieren/Sortieren vom Bericht die Sortierung entfernen
und in der Datensatzherkunft diese Sortierung erstellen.
Das Filter kannst dann auch gleich in die Abfrage einbauen.

Abfrage vom Bericht mit QueryDef umbauen.

Mir fällt sonst nichts brauchbares ein *Smilie

 

Moin,
im Moment übergibst du das als Where-Condition - die kann mit einem OrderBy nix anfangen. Entweder Übergabe als OpenArgs und im Bericht entsprechend auswerten oder gleich den Filter und das OrderBy von Bericht A an Bericht B zuweisen.
maike

 

Danke für eure Antworten.

Habe mit OpenArgs noch nicht gearbeitet und komme damit noch nicht so klar.

Wie übergebe ich denn varFilter oder Me!abfÜbersicht.Report.OrderByOn und Me!abfÜbersicht.Report.Filter an OpenArgs?

Dann muss ich Gruppieren/Sortieren im Bericht entfernen?

Dann so was?

Private Sub BerabfÜbersicht_Bericht_Druck_Open(Cancel As Integer)

BerabfÜbersicht_Bericht_Druck.OpenArgs

End Sub

??

 

OpenArgs übergibst du statt der Where-Condition an dieser Stelle:
Code:

Damit der Bericht das auseinanderfisseln kann, am besten mit einem Semikolon getrennt so nach diesem Muster:
Code:

Im Bericht dann beim Öffnen auswerten, nach diesem Schema:
Code:

Wenn aber der andere Bericht sowieso geöffnet ist, dann müsste auch einfach
Code:

funktionieren.

maike

 

1.000 Dank

Ich glaube am einfachsten ist wirklich:

Code:

es geht aber nicht. Beides nicht.
Me.Filter müsste das doch aber eigentlich machen (Me!abfÜbersicht.Report.Filter / liefert das gewünschte Ergebnis)?

Damit komme ich glaube ich ganz einfach zum Ziel. Coole Idee!!

 

Äh, geht es jetzt oder geht es nicht *confused.gif* ?
Damit es funktioniert, muss auf jeden Fall der Bericht abfÜbersicht geöffnet sein.
Und Me.FilterOn = true bzw. Me.OrderByOn = true fehlt noch im Code.
maike

 

Es geht!!!!

Hatte
Me.Filter = true
und
Me.OrderBy = true

Sorry. Ganz vielen Dank!!!


Super