OVH Cloud OVH Cloud

a l'aide

2 réponses
Avatar
AdminCTM
Je voudrai savoir comment faire pour afficher automatiquement une date de
validation.
Je m'explique :
Par exemple quand je coche une case à cocher, je voudrai que dans un champ
du formulaire s'affiche la date du jour où la case a été cochée et également
que cette case soit verroulllée.

D'avance merci

2 réponses

Avatar
squeepy
je sais pas si c'est ça
if caseacocher.value = true then
txt_test.value = aujourdhui()
caseacocher = verrouillé
end if

je sais pas trop la syntaxe mais je pense que l'idée doit être bonne
--
Merci de votre aide



Je voudrai savoir comment faire pour afficher automatiquement une date de
validation.
Je m'explique :
Par exemple quand je coche une case à cocher, je voudrai que dans un champ
du formulaire s'affiche la date du jour où la case a été cochée et également
que cette case soit verroulllée.

D'avance merci


Avatar
Pierre CFI [mvp]
bonjour
met les noms exacts
Private Sub Cocher0_AfterUpdate()
If Me.Cocher0 = -1 Then
Me.Texte2 = Date
Me.Cocher0.Locked = True
End If

End Sub


--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info

"AdminCTM" a écrit dans le message de news:

Je voudrai savoir comment faire pour afficher automatiquement une date de
validation.
Je m'explique :
Par exemple quand je coche une case à cocher, je voudrai que dans un champ
du formulaire s'affiche la date du jour où la case a été cochée et également
que cette case soit verroulllée.

D'avance merci