Masquer des colonnes avec cellules fusionnées

[Didine]

Bonjour,

Alors voilà j'explique mon problème : je voudrais pouvoir masquer des colonnes à l'aide d'une macro, seulement j'ai des cellules des colonnes que je veux masquer qui sont fusionnées avec des cellules de colonnes que je veux laisser afficher.
Lorsque je le fais à la main en sélectionnant les colonnes que je veux masquer pas de problème, par contre quand j'utilise une macro (dont le code est ci-dessous), ça me masque toutes les colonnes qui ont une cellule fusionnée avec l'une des cellules des colonnes que je veux masquer.
J'espère que mon explication est claire.
Si quelqu'un sait comment s'y prendre je le remercie par avance de son aide.


Sub MasqueColonne()
'
' MasqueColonne Macro
' Macro permettant de masquer des colonnes
'

'
Columns("G:I").Select
Range("G2").Activate
Selection.EntireColumn.Hidden = True
Range("A1").Select

End Sub

 

[Gérard DEZAMIS]

Bonjour Didine

Avec ce fichier est-ce que cela fonctionne comme espéré ?

J'ai simplement "défusionné" les colonnes et demandé dans format cellule alignement horizontal = centré sur plusieurs colonnes.
A l'oeil on ne voit pas la différence mais cela évite le bouzin d'avoir à mettre dans la macro une "défusion" + un "masque" de colonne"+ une refusion. Et rebelote à chaque fois.

@+
GD

 

[Didine]

Ca marche bien si toutes les colonnes à masquer concernent la même cellule "fusionnée" par contre si c'est à cheval sur deux cellules "fusionnées" là du coup ça m'enlève le libellé de la cellule fusionnée de droite.
En tout cas ça me permet de bien avancer.
Merci

 

[Robert]

Salut Didine, Gérard, le forum

tu peux aussi essayer ta macro un peu modifiée :

Sub MasqueColonne()
Columns("G:I").EntireColumn.Hidden = True
Range("A1").Select
End Sub

Je l'ai testée avec des cellule fusionnées et ça marche.

À plus,

Robert

 

[Didine]

Re-bonjour,

merci beaucoup là ça marche nickel même avec mes cellules fusionnées.