Bonjour à tous et à toutes,
J'ai un formulaire en mode tabulaire pour le suivi des cotisations d'adhérents.
Sur activation j'ai ceci :
Je ne peux donc modifier intempestivement une donnée du formulaire.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub Form_Current() Me.AllowEdits = False End Sub
J'ai un bouton "Modifier" avec ceci :
Avec cette procédure, je débloque TOUS les contrôles du formulaire.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Private Sub Modification1_Click() Dim Ctl As Control For Each Ctl In Me.Détail.Controls If (Ctl.ControlType = acTextBox) Or (Ctl.ControlType = acComboBox) Or (Ctl.ControlType = acCheckBox) Then Ctl.Locked = False End If Next Ctl End Sub
Or je ne voudrais débloquer que les seuls contrôles de l'enregistrement sélectionné.
Comment procéder et quel code associer à un bouton "Valider la modification actuelle" avant de pouvoir passer à un autre enregistrement ?
Merci de votre aide.
A+
c15
Partager