stagiairerm
XLDnaute Occasionnel
Bonjour voici une macr pour masquer les lignes selon un critere qui marche tres bien .
Rows("14:47").Select
Selection.EntireRow.Hidden = True
Range("G14:G47").Select
For Each o In Selection
If o.Value = Range("F9").Value Then
o.EntireRow.Hidden = False
End If
Next
j'essaye desesperement de transformer cette Macro pour masquer des colonnes cette fois ci toujours selon un critère... mais ca marche pas !!
Columns("S:IH").Select
Selection.EntireColumn.Hidden = True
Range("S7:IH7").Select
For Each o In Selection
If o.Value = Range("P5") Then
o.EntireColumn.Hidden = False
End If
Next
End Sub
Je ne comprends pas ou le pb. il bloque là : Selection.EntireColumn.Hidden = True
Merci de votre aide
Rows("14:47").Select
Selection.EntireRow.Hidden = True
Range("G14:G47").Select
For Each o In Selection
If o.Value = Range("F9").Value Then
o.EntireRow.Hidden = False
End If
Next
j'essaye desesperement de transformer cette Macro pour masquer des colonnes cette fois ci toujours selon un critère... mais ca marche pas !!
Columns("S:IH").Select
Selection.EntireColumn.Hidden = True
Range("S7:IH7").Select
For Each o In Selection
If o.Value = Range("P5") Then
o.EntireColumn.Hidden = False
End If
Next
End Sub
Je ne comprends pas ou le pb. il bloque là : Selection.EntireColumn.Hidden = True
Merci de votre aide