Discussion :

[Clelia]

Bonjour,
Je voudrais que mes enregistrement dans mon formulaire ne soient pas editable, a moins de cliquer sur "Modifier". J'ai donc un

Private Sub Form_Current()
Me.AllowEdits = False
End Sub

et un

Private Sub Modifier_Click()
Me.AllowEdits = True
End Sub

Et jusque la tout va bien. Mais dans mon Form_Current() j'ai aussi un
Me.Fonction.Value = DLookup("[Fonction]", "Fonction_Identification", "[Identification]='" & Me.Identification.Value & "'")
qui me permet de verifier la synchronisaton entredeux combo box "fonction" et "identification". Or a cause de cette ligne, mon enregistrement dans mon formulaire devient editable.
comment faire?
Merci.
clelia.

[zoom61]

Salut,

Ce que tu peux faire c'est de créer une variable à l'ouverture de ton formulaire. Et que tu fasses un test sur la synchronisation pour autoriser la modification. Par exemple en faisant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Me.Fonction.Value = DLookup("[Fonction]", "Fonction_Identification", "[Identification]='" & Me.Identification.Value & "'") 
If test_modif = 1 then
   Me.AllowEdits = False 
end if