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.