masquage de colonne sous Excel 97

[arno]

Bonjour,

J'ai fait une petite macro qui masque toutes les colonnes correspondantes à une certain critère (celles dont la ligne 9 est non-vide). J'ai utilisé la fonction 'columnwidth'.
Or, j'ai fait ma macro sous Excel 2000 et quand j'envoie ce fichier à d'autres qui utlisent Excel97, ils obtiennent 'impossible de définir la propriété columnwidth de la fonction range'.
Quelqu'un connait il une façon de masquer/afficher des colonnes et lignes sous Excel 97.

Merci beaucoup,

Arno



Pour info, voici un bout de ma macro.


Private Sub semaines_Click()

Dim c, d As Variant
Dim i As Long

i = ActiveSheet.Cells(1, 15).Value 'dans la cellule, j'ai mis un indicateur me disant si il faut masquer (=1) ou afficher (=0) les colonnes

For Each c In [$L$9:$ID$9]

If (c <> "") Then
If (i = 1) Then Range(d).ColumnWidth = 0 Else Range(d).ColumnWidth = 11
End If

Next


ActiveSheet.Cells(1, 15) = 1 - i

End Sub

 

[sousou]

pour moi cette propriété fonctionne sous excel 97

ActiveSheet.Columns(1).ColumnWidth==0

 

[arno]

bonjour Sousou,

je vais donc ré-essayé encore une fois ce soir..

Merci,

Arnaud