Dynamisches Filtern und Öffnen von Formularen

[Username]

Hey Leute!

Ich stehe vor einem Problem.
Ich öffne in einem Formular per Button ein zweites Formular. Als Übergabeparameter bekommt es den Namen des ersten Formulars.
Im zweiten Formular weise ich den Namen des ersten Formulars dann einer Variable zu:

Code [Auswählen] Erweitern

Dim frm AS String
frm = Me.OpenArgs
Habe mittels

Code [Auswählen] Erweitern

Dim Formular AS String
Formular = "Forms!" & frm & ""
das richtige Argument erstellt.
Nun möchte ich das erste Formular mit dem zweiten filtern. Die Filterargumente mit einer konkreten Seite funktionieren (Forms![MeinFormular].Filter) . Wenn man aber die Variable anstatt der Seite nennt (Formular.Filter), bockt er.


Wo liegt das Problem, bzw. gibt es eine andere Möglichkeit beliebige (dynamisch) Formulare anzusprechen?

Danke!

[DF6GL]

Hallo,

es ist nicht möglich einen Objekt-Verweis (Forms) als String in einer Variablen zu speichern...

Etwa so geht's:

Code [Auswählen] Erweitern


Public strFrmName as String
.
.
.
Sub Form_Open(Cancel as Integer)
If not IsNull(Me.Openargs) Then strFrmName= Me.Openargs
End Sub
.
.
.
Sub btnFilterForm()
Forms(strFrmName).Filter="ID=1"
Forms(strFrmName).FilterOn =true
End Sub

[Username]

Wie immer sehr hilfreich
Top, Danke!