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.
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
Zitat von: Towelie am April 08, 2023, 11:13:05ich versuche verzweifelt einen Objektnamen durch eine Variable in einer DoCmd.OpenForm Anweisung zu ersetzen.
Worin genau besteht denn dein Problem?
So sollte es funktionieren:
Private Sub cmdTest_Click()
Dim lngGruppe As Long
lngGruppe = 2
Dim Feldname As String
Feldname = "IDFremdGruppe"
DoCmd.OpenForm "frmTest", , ,Feldname & " = " & lngGruppe
End Sub
Hallo PhilS,
deine Lösung funktioniert natürlich super!
Vielen Dank.
Zitat von: PhilS am April 08, 2023, 11:54:16Worin 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. :)