Compter des groupes de cellules adjacentes

Bonjour le forum

j'ai une ligne sur laquelle se trouve plusieurs cellules remplies par 0.5.

Je cherche la formule me permettant de compter les cellules adjacentes.

Dans le fichier d'exemple joint, je cherche à obtenir 2, 1, 0.5.

Merci de votre aide précieuse !

bonjour,

solution via une fonction personnalisée

Function celadj(r, Optional v = "")
    vt = v
    For Each cel In r
        If cel <> "" And (cel = vt Or v = "") Then
            If ctr = 0 Then vt = cel.Value
            ctr = ctr + 1
        Else
            If ctr > 0 Then
                rep = rep & ctr * vt & ", "
                ctr = 0
            End If
        End If
    Next cel
    If ctr > 0 Then
        rep = rep & ctr * vt & ", "
    End If
    celadj = Left(rep, Len(rep) - 2)
End Function

un paramètre optionel permet de préciser la valeur dont il faut faire la somme des cellules successives. Si le paramètre est omis, la fonction fera la somme des cellules successives contenant la même valeur.

=celadj(B4:K4;0,5) donner les sommes des cellules successives contenant 0,5

=celadj(B4:K4) donner les sommes des cellules successives contenant une même valeur

bonjour

un essai

cordialement

Merci beaucoup, voici deux bases sur lesquelles construire mon fichier. Vous êtes excellents !