Faire apparaître et dispparaître une cellule

andy2092 Messages postés 78 Date d'inscription   Statut Membre Dernière intervention   -  
cs_Le Pivert Messages postés 8437 Statut Contributeur -
Bonjour,

J'ai une plage avec des données groupées avec un titre au dessus. Je souhaiterai que quand cette plage est visible, le titre dispparaît est vice versa.

Voici une illustration :



Est-ce possible ?

Merci !

1 réponse

  1. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     
    Bonjour,

    Comme ceci:

    If Rows("4:15").EntireRow.Hidden = False Then
    MsgBox "afficher"
     Range("B2").Font.ColorIndex = 2
    Else
    MsgBox "masquer"
     Range("B2").Font.ColorIndex = xlAutomatic
    End If


    adapter la plage de cellule ainsi que la cellule de titre
    0
    1. andy2092 Messages postés 78 Date d'inscription   Statut Membre Dernière intervention  
       
      Super ! Par contre je le place où le code parce que quand je le mets dans "Selection change" je suis obligé de sélectionner le titre pour qu’il apparaisse ou disparaisse. Si je le mets dans "Change", ça ne fonctionne pas.

      Ps : j'ai retiré les MsgBox parce que je souhaite que ça se fasse subtilement.

      Merci
      0
    2. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
       
      Tu mets un bouton pour masquer ou afficher avec ce code:

      Option Explicit
      Private Sub CommandButton1_Click()
       Rows("4:15").EntireRow.Hidden = False = Rows("4:15").EntireRow.Hidden = True
      test
      End Sub
       Sub test()
      If Rows("4:15").EntireRow.Hidden = False Then
       Range("B2").Font.ColorIndex = 2
      Else
       Range("B2").Font.ColorIndex = xlAutomatic
      End If
      End Sub
      
      


      voilà

      @+ Le Pivert
      0