macro cacher colonne (pb cellules fusionnées)

[scap]

Bonjour à tous,
Je voudrais savoir ce qu'il faut ajouter à une macro "cacher colonne" comme celle-ci:

Sub Macro2()
'
Columns("C:C").Select
Selection.EntireColumn.Hidden = True
End Sub

pour qu'elle ne cache pas plusieurs colonnes si certaines cellules de la colonne C sont fusionnées avec des cellules d'autres colonnes.

Merci d'avance
et bonne journée

 

[myDearFriend!]

Re : macro cacher colonne (pb cellules fusionnées)

Bonjour scap,

Si on ne l'annonce pas 10 fois par jour dans ce forum 😱... Avec VBA, les Select sont généralement inutiles et souvent sources d'erreur.

Ceci devrait donc fonctionner :

[SIZE=2]Columns("C:C").EntireColumn.Hidden = [COLOR=NAVY]True[/COLOR][/SIZE]

Cordialement,

 

[myDearFriend!]

Re : macro cacher colonne (pb cellules fusionnées)

Re,

Tu peux même simplifier encore plus en faisant comme ça :

[SIZE=2]Columns("C").Hidden = [COLOR=NAVY]True[/COLOR][/SIZE]

Cordialement,

 

[scap]

Re : macro cacher colonne (pb cellules fusionnées)

Merci
c'était pas bien compliqué, mais bon comme on dit il vaut mieux 1 qui sait que 10 qui cherchent.
Merci encore
à la prochaine

 

[scap]

Re : macro cacher colonne (pb cellules fusionnées)

une autre petite question:
est-il possible que le même bouton cache des colonnes au premier clic et les montre au deuxième clic ou je dois creer un autre bouton?

 

[myDearFriend!]

Re : macro cacher colonne (pb cellules fusionnées)

Re,

Tu peux procéder comme suit :

[SIZE=2][COLOR=NAVY]Sub[/COLOR] Macro2()
[COLOR=NAVY]Static[/COLOR] Masquer [COLOR=NAVY]As Boolean[/COLOR]
    Masquer = [COLOR=NAVY]Not[/COLOR] Masquer
    Columns("C").Hidden = Masquer
[COLOR=NAVY]End Sub[/COLOR][/SIZE]

Le principe est simple :

• une variable "Masquer" de type boolean (donc de valeur True ou False)
• une ligne de code : "Masquer = Not Masquer" qui permet d'inverser la valeur de cette variable à chaque appel.
• Une déclaration de type "Static" pour que la valeur de cette variable soit mémorisée et retrouvée lors de chaque appel à la dite procédure.

Cordialement,

 

[scap]

Re : macro cacher colonne (pb cellules fusionnées)

c'est parfait j'ai compris le truc
Merci bien

 

[rodavi]

Re : macro cacher colonne (pb cellules fusionnées)

Bonjour, je suis sur excel 2003 et j'ai eu le même problème que scap pour masquer des colonnes sur excel à cause des cellules fusionnées.J'ai vu que MDF a répondu et j'ai essayé ce qu'il a dit, mais ça ne marche pas.Je crois que je ne sais pas comment on utilise cette fonction.
Voila ce que j'ai mis sur vba:

Sub TEST2()
'
' TEST2 Macro
' Macro enregistrée le 07/08/2012 par
'

'
Columns("C:C").EntireColumn.Hidden = True


End Sub

en fait si on peut m'expliquer ce qu'il faut faire.
ça me met erreur de syntaxe:erreur de compilation.