Zugriff auf Filterung in Datenblattansicht - geteiltes Formular

[rjoebges]

Hallo zusammen,

ich habe ein geteiltes Formular, mit der Datenblattansicht unten. Die Datenblattansicht wird über einige Kontrollkästchen vorgefiltert. Über die Kontrollkästchen hinaus kann natürlich auch noch in der Datenblattansicht an sich weiter gefiltert werden (in meinem Fall nach bestimmten laufenden Nummern).
Gibt es eine Möglichkeit diese Filterung im Datenblatt per VBA auszulesen und meinem Gesamtfilter hinzuzufügen?
In älteren Beiträgen (2010/2011) habe ich gelesen, dass generell kein Zugriff auf die Filterung im Datenblatt möglich ist, ist das noch aktuell?

Vielen Dank
rjoebges

[Beaker s.a.]

Hallo,

ich habe ein geteiltes Formular, mit der Datenblattansicht unten. Die Datenblattansicht wird über einige Kontrollkästchen vorgefiltert.

Heisst das, dass die Einzelblattansicht getrennt gefiltert werden kann.
IMO ist ein geteiltes Formular trotzdem nur eins; - beide Teile haben die
gleiche DS-Herkunft.
Also sollte der Filter auch ausgelesen werden können. Versuche es mal im
Direktfenster (VBA-Editor, Strg-G):

Code [Auswählen] Erweitern

?Forms!DeinFormular.Filter
(Formular muss natürlich geöffnet und gefiltert sein.)

gruss ekkehard

[rjoebges]

Das funktioniert wunderbar, jetzt bekomme ich alle Filtereinstellungen ausgegeben, kann ich mich auch auf diese in VBA dann beziehen? (weiß nicht, wie der Zusammenhang von Direktbereich und Editor ist).

Grüße

[Beaker s.a.]

Hallo,

weiß nicht, wie der Zusammenhang von Direktbereich und Editor ist).

Das Direktfenster ist zur Laufzeit irrelevant. Wird nur während der Entwicklung
gerne herangezogen um solche schnellen ad hoc Prüfungen durchzuführen bzw.
per Debug.Print etwas auszugeben (s.u.)

kann ich mich auch auf diese in VBA dann beziehen?

Sicher, etwa so

Code [Auswählen] Erweitern

Dim strFilter as String

strFilter = Me.Filter
' oder auch
strFilter = Forms.IrgendeinFormular.Filter  'diese muss aber geöffnet sein
Debug.Print strFilter    'schreibt den String ins Direktfenster

gruss ekkehard