Recopier valeur de champ selon case à cocher
Résolu/Fermé
A voir également:
- Recopier valeur de champ selon case à cocher
- Supprimer case à cocher excel ✓ - Forum Excel
- Aller à la ligne dans une case excel - Guide
- Case à cocher open office - Forum LibreOffice / OpenOffice
- Case à cocher outlook - Forum Outlook
- Comment cocher une case sans souris ✓ - Forum Windows
2 réponses
Utilisateur anonyme
2 sept. 2013 à 09:44
2 sept. 2013 à 09:44
Bonjour,
quelqu'un pour un coup de main de bon matin ?
D'avance merci
quelqu'un pour un coup de main de bon matin ?
D'avance merci
Utilisateur anonyme
2 sept. 2013 à 16:07
2 sept. 2013 à 16:07
j'ai l'impression d'être un peu autiste mais voilà la solution (qui pourra toujours servir) :
1/ activer les macros sous access (eh oui !) : Cliquez sur le bouton Microsoft Office Image du bouton, puis sur Options Access. Cliquez sur Centre de gestion de la confidentialité, sur Paramètres du Centre de gestion de la confidentialité, puis sur Paramètres des macros. Puis choisir la bonne option
2/ en mode création du formulaire cliquer sur la case à cocher > afficher les propriétés > aller dans l'onglet "évennement" > dans la case "après mise à jour" choisir [Event Procedure] .
Voici un exemple de code :
Private Sub Même_adresse_facture_AfterUpdate()
If Me.Même_adresse_facture.Value = True Then
'même adresse cochée
Me.Nom_facture.Enabled = False
Me.Nom_facture = Me.Nom
Else
'pas même adresse
Me.Nom_facture.Enabled = True
End If
End Sub
Il permet si "Même_adresse_facture" est cochée de recopier la valeur du champ "Nom" dans le champ "Nom_facture" et de ne pas autoriser l'édition sinon il autorise l'édition du champ "Nom_facture".
Merci Ludo !
1/ activer les macros sous access (eh oui !) : Cliquez sur le bouton Microsoft Office Image du bouton, puis sur Options Access. Cliquez sur Centre de gestion de la confidentialité, sur Paramètres du Centre de gestion de la confidentialité, puis sur Paramètres des macros. Puis choisir la bonne option
2/ en mode création du formulaire cliquer sur la case à cocher > afficher les propriétés > aller dans l'onglet "évennement" > dans la case "après mise à jour" choisir [Event Procedure] .
Voici un exemple de code :
Private Sub Même_adresse_facture_AfterUpdate()
If Me.Même_adresse_facture.Value = True Then
'même adresse cochée
Me.Nom_facture.Enabled = False
Me.Nom_facture = Me.Nom
Else
'pas même adresse
Me.Nom_facture.Enabled = True
End If
End Sub
Il permet si "Même_adresse_facture" est cochée de recopier la valeur du champ "Nom" dans le champ "Nom_facture" et de ne pas autoriser l'édition sinon il autorise l'édition du champ "Nom_facture".
Merci Ludo !