MACRO : Masquer/démasquer des colonnes .auto

Résolu
Awazagaga Messages postés 33 Statut Membre -  
Awazagaga Messages postés 33 Statut Membre -
Bonjour,

Je souhaite masquer et démasquer les colonnes D, E, G, H, J, K grâce à une macro mais je n'arrive pas, il y a un blocage dans le code.
Voici le code :

Sub Masquer/Demasquer_Extract()

 With Columns("D:D,E:E,G:G,H:H,J:J,K:K")
.Hidden = Not .Hidden
End With

End Sub


Je ne vois pas d'où vient l'erreur ..

J'espère avoir une réponse je me prend la tête depuis 1h.

Merci vous et vos claviers !

:)

1 réponse

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

    Déjà avec cela il y a une erreur qui s'affiche en rouge:

    Sub Masquer/Demasquer_Extract()


    Comme ceci:

    Sub Masquer_Demasquer_Extract()
     With Columns.Range("D:E,G:H,J:K")
    .EntireColumn.Hidden = Not .EntireColumn.Hidden
     End With
    End Sub

    0
    1. Awazagaga Messages postés 33 Statut Membre
       
      Merci Le Pivert,

      Je n'avais pas encore mis ce titre, j'aurai corriger le problème.

      Pour ce qui est du code, je te remercie ça fonctionne très bien !
      Je comprends mieux pourquoi cela ne marchait pas..


      @+ Awzgg
      0