Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Affichage des champs suivant case cochée

  • Initiateur de la discussion Initiateur de la discussion nrdz83
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

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
 
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
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
9
Affichages
405
  • Question Question
Microsoft 365 Probléme VBA
Réponses
8
Affichages
447
Réponses
7
Affichages
287
Réponses
2
Affichages
214
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…