Valeurs consécutives

[neishka]

Bonjour à tous,

je cherche désespérément une formule qui puisse me dire si oui ou non dans une ligne j'ai 3 même valeurs consécutives.
ex: 1 0 1 1 0 1 1 faux
mais 1 0 1 1 0 1 1 1 vrai
j'ai écrémé le forum, mais je ne trouve rien qui corresponde à mon problème

Merci de votre aide!

 

[R@chid]

Re : Valeurs consécutives

Bonjour et Bienvenue sur XLD,
Il faut nous dire plus,
Est ce que tu n'as que des 0 et 1 comme valeurs ??
Est ce qu'il faut compter aussi les 0 en cas de 1 1 0 0 0 0 1 0 autrement dit renvoyer VRAI pour ce cas ??

@ + +

 

[neishka]

Re : Valeurs consécutives

Non j'aimerais juste avoir les 1 consécutifs.
je peux avoir des cellules vides (ou marquées x si besoin) entre ces séquences ex : 1 0 x 0 1 1 1

merci beaucoup ;-)

 

[R@chid]

Re : Valeurs consécutives

Bonsoir,
Voir PJ
@ + +

 

[Modeste geedee]

Re : Valeurs consécutives

Bonsour®

une petite fonction personnalisée

Function TroisUn(plage As Range)
    Dim temp As String, cell As Range
        If plage.Rows.Count = 1 Then
                For Each cell In plage
                        temp = temp & cell.Text
                Next
                TroisUn = temp Like "*111*"
        Else
                TroisUn = "Multi lignes"
        End If
End Function

 

[neishka]

Re : Valeurs consécutives

Merci r@chid, la formule est parfaite!


(je note quand meme le vb au cas ou ;-) )


Merci infiniment en tout cas!

 

[R@chid]

Re : Valeurs consécutives

Bonsoir @ tous,
Salut GD,
@ neishka :
Il faut noter que la formule proposée est matricielle, elle nécessite la validation par Ctrl+Maj+Entree
Voici une autre formule matricielle,

=MAX(SOUS.TOTAL(9;DECALER(A1;;LIGNE(INDIRECT("1:"&COLONNES(A:I)-2))-1;;3)))>2

@ + +