Affichage des champs suivant case cochée

nrdz83

XLDnaute Impliqué
Bonjour à tous et bonne fin de week end,

Voila je cherche à masquer deux champs ([NPAR] et [DesignationPAR]) lorsque ma case à cocher [Suppa] est cochée.

J'utilise ce code
Code:
Private Sub Suppa_Click()
 
 
     If Me![Suppa] = True Then     'si la case est cochée
          Me![NPAR].Visible = False
          Me![DesignationPAR].Visible = False
     Else
          Me![NPAR].Visible = True
          Me![DesignationPAR].Visible = True
     End If
End Sub


Qui est placé sur la checbox.

Mon problème est que l'affichage des champs de s'actualise pas en fonction des enregistrement que e sélectionne.

Comment faire pour que l'action soit actualisée au changement d'enregistrement?

Dois je modifier ce code?
Dois je le placer ailleus?
Est il possible de remplacer ce code par une maccro?

Par avance merci pour vos lumières

amitiés
 

stefan373

XLDnaute Occasionnel
Re : Affichage des champs suivant case cochée

Bonjour nrdz83 et le forum,

Si j'ai bien compris votre demande, cela devrait faire l'affaire. :)

Code:
Private Sub Form_Current()
Select Case Me.Suppa
 
        Case Is = True
 
            Me.NPAR.Visible = True
            Me.DesignationPAR.Visible = True
 
        Case Else
 
            Me.NPAR.Visible = False
            Me.DesignationPAR.Visible = False
 
    End Select
End Sub

A + Stéfan
 

Discussions similaires