Bonjour,

J'ai créé une macro pour masquer les colonnes vides.

Le problème est que ça ne masque que la ligne 6, alors que je voudrais que soit maquer les colonnes vides sur une sélection de lignes de 6 à 125.

Pouvez vous m'aider.

Ma macro

Sub Masquer()
'Masque les colonnes où L3=X
Application.ScreenUpdating = False
Dim i As Integer
For i = 6 To 114
If Cells(6, i) = "" Then
Columns(i).Hidden = True
Else: Columns(i).Hidden = False
End If
Next i
Application.ScreenUpdating = True
End Sub

Merci

Valérie

Salut,

en enlevant le 6 ici If Cells(i) = "" Then c'est fonctionnel,
attention cela ne masque que si la ligne 1 est vide, si une donnée présente en L2 par exemple et rien en L1 alors la colonne est masquée

cela ne masque qu'a partir de la colonne F et s’arrête après la colonne DJ (ton 6 à 114).

@+


Sub Masquer()
'Masque les colonnes où L3=X
Application.ScreenUpdating = False
Dim i As Integer
For i = 6 To 114
If Cells(i) = "" Then
Columns(i).Hidden = True
Else: Columns(i).Hidden = False
End If
Next i
Application.ScreenUpdating = True
End Sub

Bonjour,

Merci, mais cela prend en compte que les données de la première colonne et masque systématiquement toutes les autres colonnes.

C'est ok ou pas ?

de mon coté cela fonctionne

@+