Bonjour,
Lors de l'activate d'un onglet j'applique le code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Sub ReportingRD_Activate() 
If Visu2012 = False Then 
'-- réduction des colonnes 2012 
Columns("B:M").ColumnWidth = 0.1 
Else 
'-- affichage des colonnes 2012 
Columns("B:M").ColumnWidth = 10 
End If 
End Sub
==> ça marche nickel

Par contre, j'ai créé un bouton dans l'onglet pour basculer
l'affichage avec le code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub Toggle_visu2012() 
If Visu2012 = True Then 
' bascule à False et on cache les colonnes 2012 
Visu2012 = False 
Columns("B:M").ColumnWidth = 0.1 
Else 
' bascule à True et on montre les colonnes 2012 
Visu2012 = True 
Columns("B:M").ColumnWidth = 10 
End If 
End Sub
Lorsque j'appuie sur le bouton, j'ai le message d'erreur suivant :

Erreur d'exécution '-2147417848'
La méthode columnwith a échoué

Et l'excel se ferme méchamment.
Je ne comprends pas car le code me semble correct.
Quelqu'un aurait-il une idée ?

Par avance, merci !