Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Filter in Ufo`s

0 views
Skip to first unread message

Georg Wagner

unread,
Feb 10, 2002, 12:26:17 PM2/10/02
to
Hallo NG,

in einem Formular wird mit einem Kombinationsfeld ein Filter gesetzt

Dim a
a = [combSucheAdrart]
DoCmd.ApplyFilter , "AdrartID = " & a & ""

Das funktioniert soweit so gut.

Da es mehrere gleichartige Formulare gibt, möchte ich die alle mit
Registersteuerelemten in einem ansonsten leeren, ungebundenen Formular
darstellen, um es für den Benutzer zu vereinfachen.

Jedoch da pfeift Access und sagt:

Laufzeitfehler 2491; Die Aktion oder Methode ist nicht zulässig, da das
Formular nicht an eine Abfrage oder Tabelle gebunden ist.

Hat jemand eine Tipp dazu?

Danke!

Georg Wagner

Jürgen Volke

unread,
Feb 11, 2002, 4:09:55 AM2/11/02
to
Hallo Georg
den Ufos eine Tabelle, oder Abfrage als Datenherkunft
zuweisen !

das hat aber nix mit dem Plazieren auf einem
Registersteuerelement zu tun

Gruß Jürgen


Erwin Kainbacher

unread,
Feb 11, 2002, 5:01:29 AM2/11/02
to
"Georg Wagner" <Georg....@t-online.de> wrote in message news:<a46ac1$qji$07$1...@news.t-online.com>...

> Hallo NG,
>
> in einem Formular wird mit einem Kombinationsfeld ein Filter gesetzt
>
> Dim a
> a = [combSucheAdrart]
> DoCmd.ApplyFilter , "AdrartID = " & a & ""
>
> Das funktioniert soweit so gut.
>
> Da es mehrere gleichartige Formulare gibt, möchte ich die alle mit
> Registersteuerelemten in einem ansonsten leeren, ungebundenen Formular
> darstellen, um es für den Benutzer zu vereinfachen.

Mehr aus dem Titel, als aus der Beschreibung denke ich, dass die
"aufrufende Aktion" nachwievor im (neuen) HF stattfindet, der Filter
sich aber auf die UFo's auswirken soll. Das geht so:

Me!UFoControlName.Form.Filter = "AdrartID = " & Me!combSucheAdrart
Me!UFoControlName.Form.FilterOn = True

Fuer "UFoControlName" deinen entspr. Namen des UFo-Steuerelementes
einsetzen.

HTH erwin...

Georg Wagner

unread,
Feb 12, 2002, 11:20:06 AM2/12/02
to
Hallo Erwin,

"Erwin Kainbacher" <er...@kainbacher.de> schrieb im Newsbeitrag
news:b3ec0df2.02021...@posting.google.com...

<Zitat>


> Mehr aus dem Titel, als aus der Beschreibung denke ich, dass die
> "aufrufende Aktion" nachwievor im (neuen) HF stattfindet, der Filter
> sich aber auf die UFo's auswirken soll. Das geht so:
>
> Me!UFoControlName.Form.Filter = "AdrartID = " & Me!combSucheAdrart
> Me!UFoControlName.Form.FilterOn = True
>
> Fuer "UFoControlName" deinen entspr. Namen des UFo-Steuerelementes
> einsetzen.

<Zitat>

danke für den Beitrag. Ich habe mich leider missverständlich ausgedrückt.
Das Formular allein aufgerufen funktioniert. Erst wenn es als Ufo in einem
Dummy-Formular - dort in ein Seitensteuerelement - eingefügt wird, klappt es
nicht mehr. Das Kombinationsfeld mit der Auswahl befindet sich im
Formularkopf des Ufo.

Noch eine Idee?

Georg

Georg Wagner

unread,
Feb 12, 2002, 11:44:22 AM2/12/02
to
Hallo Erwin,
nochwas:

> > Dim a
> > a = [combSucheAdrart]
> > DoCmd.ApplyFilter , "AdrartID = " & a & ""
> >

> Me!UFoControlName.Form.Filter = "AdrartID = " & Me!combSucheAdrart
> Me!UFoControlName.Form.FilterOn = True
>

Wann ist es sinnvoller, die docmd.applyfilter Methode zu verwenden bzw. wann
me.filter?

Danke!

Georg


0 new messages