Discussion :

[Jonkill]

Bonjour,

Je voudrais activer / désactiver un bouton (bouton) en fonction d'un checkbox (coche)
(le bouton à pour fonction d'ouvrir un état)

le code suivant rend visible / invisible quand coche est cliqué (indépendant de sa valeur)

Code :

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

Me.bouton.Visible = Not Me.bouton.Visible

Hors, je veux que le bouton soit actif quand le case est cochée, j'ai donc écris cela :

Code :

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

1
2
3
4
5
6
7
Private Sub coche_AfterUpdate()
If coche = 0 Then
bouton.Visible = False
  Else: coche = -1
bouton.Visible = True
End If
End Sub

et ça fonctionne ... un peu !

mon problème vient au moment ou j'ouvre mon formulaire et que je navigue dans les enregistrements. Je ne sais pas où et comment / quoi écrire, le fait que le formulaire doit vérifier la valeur de "coche".

Merci de votre aide

ps : le bouton peut être visible ou désactivé, tant qu'il n'est pas actif ça me va

[User]

Salut,

tu peux mettre ton code sur activation (current) de ton formulaire:

Code :

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

1
2
3
4
Private Sub Form_Current()
bouton.Visible = Me.coche
 
End Sub

A+

[Jonkill]

Parfait !!

Merci