VBA disparition des mauvaises colonnes

[chifounou]

Bonjour,

J'ai une feuille avec deux cases à cocher qui chacune, distinctement, doivent faire apparaitre / disparaitre une seule colonne.

Voici la macro nommée "checkbox1" que j'ai associé à la première coche et qui s'occupe de la colonne C
Une seconde macro nommée "checkbox2" (assignée à la seconde coche)s'occupe de la colonne H pareillement.

(en case O3 masquée figure simplement le test boolean qui indique si la case est cochée/décochée)

Sub checkbox1()
ActiveWorkbook.Names.Add Name:="previous_cell", RefersToR1C1:=ActiveCell
Columns("C:C").Select
If Range("O3") = True Then
selection.EntireColumn.Hidden = False
Else
selection.EntireColumn.Hidden = True
End If
Application.Goto Reference:="previous_cell"
End Sub

Quand je coche les cases, la bonne colonne apparait. Par contre quand je décoche, au lieu que seulement la colonne C ne disparaissent, les colonnes B et C disparaissent. Pourquoi B ? ce n'est pas voulu et je n'ai rien coder en ce sens.

Pouvez-vous me sortir du pétrin ?
Merci beaucoup

 

[gosselien]

Re : VBA disparition des mauvaises colonnes

Bonjour;

il manque qq chose , il n'y a aucun module vba...

P.

 

[chifounou]

Re : VBA disparition des mauvaises colonnes

Autant pour moi.

Voici la version avec

 

[cathodique]

Re : VBA disparition des mauvaises colonnes

Normal, tu as des cellules fusionnées dans l'entête de colonnes.

Défusionne tes cellules et tout fonctionnera bien

 

[chifounou]

Re : VBA disparition des mauvaises colonnes

Oops, merci !