Comprendre Application.Countif([Feries], Cells(5, c.column))>0 [Résolu/Fermé]

Signaler
Messages postés
213
Date d'inscription
vendredi 28 novembre 2008
Statut
Membre
Dernière intervention
8 octobre 2019
-
Mouftie
Messages postés
213
Date d'inscription
vendredi 28 novembre 2008
Statut
Membre
Dernière intervention
8 octobre 2019
-
Bonjour,
J'ai un poste en cours, (http://www.commentcamarche.net/forum/affich-30867185-vba-effacer-les-cellules-d-une-plage-correspondantes-aux-week-en#p30877700),
mais je voudrais qu'on m'explique l'utilisation de la phrase ci-dessus dans la procédure svte :
Sub effacol()
Set Plg = [C5:AG120]
For Each c In Plg
If Application.CountIf([FERIES], Cells(5, c.Column)) > 0 Then
c.ClearContents
End If
Next c
End Sub
Merci

2 réponses

Messages postés
347
Date d'inscription
mardi 7 octobre 2008
Statut
Membre
Dernière intervention
2 juin 2015
92
CountIf compte le nombre de cellules de la plage nommée [FERIES] qui correspondent au critère contenu dans la cellule dont la ligne est 5 et la colonne est c.Column.

Par exemple si la plage contient 10 cellules comportant les chiffres 1,2,3,4,5,6,7,8,9,10 et si la cellule critère contient >7, alors la fonction CountIf retourne la valeur 3.

:-)
Messages postés
213
Date d'inscription
vendredi 28 novembre 2008
Statut
Membre
Dernière intervention
8 octobre 2019
8
Merci Redaiwa, j'y vois beaucoup plus clair et merci encore pour ton tableau "Janvier"