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

Autres Message si les colonnes sont affichées.

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 !

chaelie2015

XLDnaute Accro
Bonjour Forum
je souhaite modifier ce code comme suit : lors de l’exécution du bouton affecté a ce code si le tableau ( colonnes) est affiché alors afficher le message "le tableau est déjà affiché". et si n'est pas affiché donc afficher ces colonnes sans message.
VB:
Sub Afficher_Tab_T1() 'Bouton afficher tableau
    Range("AD1:AZ1").EntireColumn.Hidden = False
    If Range("AD1:AZ1").EntireColumn.Hidden = False Then
    MsgBox ("il est déjà affiché")
    End If


End Sub
Salutations
 
Bonjour Forum
il suffit de changer l'ordre .
VB:
Sub Afficher_Tab_T1() 'Bouton afficher tableau
    
    If Range("AD1:AZ1").EntireColumn.Hidden = False Then
    MsgBox ("il est déjà affiché")
    End If

    Range("AD1:AZ1").EntireColumn.Hidden = False
End Sub
s'il y a mieux?
Merci FORUM😉
 
- 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
5
Affichages
703
  • Question Question
Microsoft 365 affichage userform
Réponses
4
Affichages
418
  • Question Question
XL 2021 listbox
Réponses
18
Affichages
502
  • Question Question
Microsoft 365 worksheet_change
Réponses
29
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…