Variablen statt Objektnamen

[Towelie]

Hallo zusammen,

ich versuche verzweifelt einen Objektnamen durch eine Variable in einer DoCmd.OpenForm Anweisung zu ersetzen.
Ich habe mir bereits bei donkarl die FAQ 6.1 durchgelesen, bekomme mein Problem aber trotzdem nicht gelöst.

Ich möchte gerne den Teil "IDFremdGruppe" in der WHERE Bedingung durch eine Variable ersetzen.

Code [Auswählen] Erweitern

Private Sub cmdTest_Click()

Dim lngGruppe As Long

    lngGruppe = 2

    DoCmd.OpenForm "frmTest", , ,"IDFremdGruppe = " & lngGruppe
   
End Sub
Ich würde mich über Lösungsvorschläge sehr freuen.
viele Grüße Towelie

[PhilS]

ich versuche verzweifelt einen Objektnamen durch eine Variable in einer DoCmd.OpenForm Anweisung zu ersetzen.

Worin genau besteht denn dein Problem?

So sollte es funktionieren:

Code [Auswählen] Erweitern

Private Sub cmdTest_Click()
    Dim lngGruppe As Long
    lngGruppe = 2
    Dim Feldname As String
    Feldname  = "IDFremdGruppe"
    DoCmd.OpenForm "frmTest", , ,Feldname & " = " & lngGruppe   
End Sub

[Towelie]

Hallo PhilS,

deine Lösung funktioniert natürlich super!
Vielen Dank.

Worin genau besteht denn dein Problem?

Natürlich in meinem fehlenden Wissen. Ich lebe von Codeschnipseln aus verschiedenen Foren, der Access bzw. VBA Hilfe und einem einzigen "wissenden" Menschen in meinem privaten Umfeld.