Affichage des champs suivant case cochée

nrdz83 · 24 Février 2013

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 · 25 Février 2013

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

tototiti2008 · 25 Février 2013

Re : Affichage des champs suivant case cochée

Bonsoir nrdz83, Bonsoir Stéfan,

Si j'ai compris, peut-être un truc comme ça (voir le formulaire)

Affichage des champs suivant case cochée

nrdz83

XLDnaute Impliqué

stefan373

XLDnaute Occasionnel

tototiti2008

XLDnaute Barbatruc

Pièces jointes

Discussions similaires