Comprendre Application.Countif([Feries], Cells(5, c.column))>0

Résolu/Fermé
Mouftie Messages postés 215 Date d'inscription vendredi 28 novembre 2008 Statut Membre Dernière intervention 6 septembre 2020 - 6 oct. 2014 à 15:21
Mouftie Messages postés 215 Date d'inscription vendredi 28 novembre 2008 Statut Membre Dernière intervention 6 septembre 2020 - 6 oct. 2014 à 19:24
Bonjour,
J'ai un poste en cours, (https://forums.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

redaiwa Messages postés 351 Date d'inscription mardi 7 octobre 2008 Statut Membre Dernière intervention 25 janvier 2024 119
6 oct. 2014 à 15:57
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.

:-)
0
Mouftie Messages postés 215 Date d'inscription vendredi 28 novembre 2008 Statut Membre Dernière intervention 6 septembre 2020 15
6 oct. 2014 à 19:24
Merci Redaiwa, j'y vois beaucoup plus clair et merci encore pour ton tableau "Janvier"
0