Excel VBA Activer la mise au point automatique
If Sheets("Sheet1").AutoFilterMode = False Then
Sheets("Sheet1").Range("A1").AutoFilter
End if
VasteMonde
If Sheets("Sheet1").AutoFilterMode = False Then
Sheets("Sheet1").Range("A1").AutoFilter
End if