S
sev
Guest
Bonjour à tous le forum,
J'ai un problème avec une macro lorsque je filtre les cellules vides.
Je voudrais que le résultat de la Macro16 reste quand je filtre.
Sub Macro16()
Sheets("Saisie").Unprotect
Application.ScreenUpdating = False
ActiveSheet.Rows.Hidden = False
For n = 23 To Range("A65536").End(xlUp).Row
If CDate(Range("C" & n)) > Range("D4").Value Then
Rows(n).Hidden = True
Else
Rows(n).Hidden = False
End If
Next n
Application.ScreenUpdating = True
Range("A1").Select
With Sheets("Saisie")
.EnableAutoFilter = True
.Protect AllowSorting:=True, AllowFiltering:=True
End With
End Sub
'Je voudrais que la colonne L filtre les cellules vides sans mofifier le résultat de la macro16'
Selection.AutoFilter Field:=12, Criteria1:="="
Merci pour vos conseils
J'ai un problème avec une macro lorsque je filtre les cellules vides.
Je voudrais que le résultat de la Macro16 reste quand je filtre.
Sub Macro16()
Sheets("Saisie").Unprotect
Application.ScreenUpdating = False
ActiveSheet.Rows.Hidden = False
For n = 23 To Range("A65536").End(xlUp).Row
If CDate(Range("C" & n)) > Range("D4").Value Then
Rows(n).Hidden = True
Else
Rows(n).Hidden = False
End If
Next n
Application.ScreenUpdating = True
Range("A1").Select
With Sheets("Saisie")
.EnableAutoFilter = True
.Protect AllowSorting:=True, AllowFiltering:=True
End With
End Sub
'Je voudrais que la colonne L filtre les cellules vides sans mofifier le résultat de la macro16'
Selection.AutoFilter Field:=12, Criteria1:="="
Merci pour vos conseils