formular Filtern beim öffnen

[AchimP]

Hallo Access Gemeinschaft,
Habe wieder ein Problem.
Habe zwei String's, diese sollen das Formula beim Öffnen filtern.

DoCmd.OpenForm "Info_frm", , , "Info_Geb =  'geb'   And Info_Klassennr = 'Klas'"
Debug.Print geb
Debug.Print Klas

die String's werden mir im Direktfenster richtig angezeigt.

was mache ich falsch?

Gruß Achim

[MzKlMu]

Hallo,
wo kommen die Texte her, sind das Formularfelder ?
Oder sind das wirklich die reinen Texte  'geb'   und  'Klas' ?

PS:
Derartige Codeschnippsel sind wenig hilfreich. Man sollte immer den kompletten Code zeigen. Und bitte immer die Codetags des Forums verwenden.

[AchimP]

Hallo Klaus,
hier der gesamte Code.

Code [Auswählen] Erweitern

Private Sub Anrufer_Name_DblClick(Cancel As Integer)
Dim Stoerung_ID As Integer
Dim Stoer_ID As Integer
Dim geb As String
Dim Klas As String

Stoer_ID = Split(OpenArgs, vbTab)(0)
Klas = Split(OpenArgs, vbTab)(1)
geb = Split(OpenArgs, vbTab)(2)



On Error GoTo err_proc



Dim strSQL  As String
DoCmd.SetWarnings False
strSQL = "update Stoerungen_tbl" _
    & " set Stoerungen_tbl.Anrufer_ID = " & Me!Anrufer_ID & "" _
    & " , Anrufer_Zeit = Now() " _
    & " where Stoerungen_tbl.Stoerungen_ID = " & Stoer_ID
    DoCmd.RunSQL strSQL
DoCmd.SetWarnings True
 
end_proc:


DoCmd.Close acForm, "Anrufer_frm"



DoCmd.OpenForm "Info_frm", , , "Info_Geb =  'geb'   And Info_Klassennr = 'Klas'"
Debug.Print geb
Debug.Print Klas


    Exit Sub
err_proc:
    MsgBox Err.Description, , Err.Number
    Resume end_proc

End Sub

[MzKlMu]

Hallo,
Du willst doch nicht die Texte geb und Klas filtern, sondern deren Inhalte. Das sind ja Variable.

Code [Auswählen] Erweitern

DoCmd.OpenForm "Info_frm", , , "Info_Geb =  '" & geb & "'  And Info_Klassennr = '" & Klas & "'"

Das ist ein Beispiel, wie wichtig es ist den kompletten Code zu zeigen. Dann wird nämlich gleich klar, dass das Variable sind mit Textinhalt und keine reinen Texte wie es im Code zu sehen ist.

Nachtrag:
Hätte ich zugegebenermaßen auch gleich durch das Debug.Print erkennen können. 

[AchimP]

vielen dank Klaus,
ich habe die programierng in access nicht gelernt.
für die hilfe bin ich sehr dank bar.
funktoniert so wie ich es wollte.
Danke Achim