Bonjour le forum,
J'utilise excel 2000 sur windows XP et j'ai un souci de macro.
Il s'agit d'une macro qui affecte le masquage de colonnes sur plusieurs feuilles.
La macro est dans un module et affectée à une forme automatique placée sur feuille6.
Voici le texte :
Sub Masq()
'Masque les colonnes où L1=X
Dim i As Integer
For i = 5 To 50
If Sheets("Feuil6").Cells(1, i) = "X" Then
Sheets("Feuil6").Columns(i).Hidden = True 'Résultats
Sheets("Feuil3").Columns(i).Hidden = True 'Données3
Sheets("Feuil4").Columns(i).Hidden = True 'Données2
Sheets("Feuil5").Columns(i).Hidden = True 'Données1
End If
Next i
End Sub
En cliquant sur le bouton j'obtiens le message d'erreur :
"Erreur d'éxécution 9 : L'indice n'appartient pas à la sélection" pointant sur la ligne 5.
Je manque d'expérience du VBA et je ne vois pas où ça cloche. Quelqu'un peut m'expliquer ?
Merci d'avance et bonne soirée !!
ccdouble6.
J'utilise excel 2000 sur windows XP et j'ai un souci de macro.
Il s'agit d'une macro qui affecte le masquage de colonnes sur plusieurs feuilles.
La macro est dans un module et affectée à une forme automatique placée sur feuille6.
Voici le texte :
Sub Masq()
'Masque les colonnes où L1=X
Dim i As Integer
For i = 5 To 50
If Sheets("Feuil6").Cells(1, i) = "X" Then
Sheets("Feuil6").Columns(i).Hidden = True 'Résultats
Sheets("Feuil3").Columns(i).Hidden = True 'Données3
Sheets("Feuil4").Columns(i).Hidden = True 'Données2
Sheets("Feuil5").Columns(i).Hidden = True 'Données1
End If
Next i
End Sub
En cliquant sur le bouton j'obtiens le message d'erreur :
"Erreur d'éxécution 9 : L'indice n'appartient pas à la sélection" pointant sur la ligne 5.
Je manque d'expérience du VBA et je ne vois pas où ça cloche. Quelqu'un peut m'expliquer ?
Merci d'avance et bonne soirée !!
ccdouble6.