Merhaba,

Hocam kodlar çift tırnak içinde, aşağıdaki gibi aynen

Private Sub Liste2_DblClick(Cancel As Integer)

    On Error GoTo Liste2_Click_Err





    DoCmd.OpenForm "F_GIRIS_KAYITLARI_DUZENLE", acNormal, "", "[T_GIRIS]![ID_GIRIS]=" & [Liste2].Column(0), acEdit, acNormal





Liste2_Click_Exit:

    Exit Sub



Liste2_Click_Err:

    MsgBox Error$

    Resume Liste2_Click_Exit

    

End Sub