bonjour à tous,
via une formule, A1 contient la valeur à compter et en supposant qu'aucune cellule ne contienne le caractère "@", sans doute à valider en matricielle sur 2007
=NBCAR(CONCAT(SI(C2:CCC17<>"";C2:CCC17;"")&SI(COLONNE(C2:CCC17)=COLONNE(CCC17);"@";"")))-NBCAR(SUBSTITUE(CONCAT(SI(C2:CCC17<>"";C2:CCC17;"")&SI(COLONNE(C2:CCC17)=COLONNE(CCC17);"@";""));A1&"@";REPT("@";NBCAR(A1))))
via une fonction personnalisée (à mettre dans un nouveau module VBA)
Function nbsidernier(plage, valeur)
For Each r In plage.Rows
For i = r.Columns.Count To 1 Step -1
If r.Cells(1, i) = valeur Then ctr = ctr + 1
If r.Cells(1, i) <> "" Then Exit For
Next i
Next r
nbsidernier = ctr
End Function
et à utiliser ainsi dans excel (plage = plage dans laquelle il faut compter les valeurs trouvées en dernière colonne non vide de chaque ligne, valeur= valeur à compter)
=nbsidernier(C2:CCC17;1)