Bom dia Mauricio,
Não consegui pensar numa solução simples deste problema por via de funções nativas. Creio que com uso de várias colunas auxiliares para ir testando valor a valor com vários SE's resolveria, porém seria bastante trabalhoso.
Como alternativa, desenvolvi uma função personalizada (UDF) para dizer qual a maior sequencia de um intervalo em linha.
Pressione ALT+F11 para abrir o editor do Visual Basic, insira um novo módulo na sua pasta de trabalho e cole o código abaixo que fiz correndo e sei que ainda pode ser melhorado e simplificado, mas no momento irá atender a sua necessidade.
Public Function MAIOR_SEQ(vArray As Range) As Integer
Dim v As Range
Dim lCount As Long, n As Long, lSum As Long, i As Long
Dim asOut() As Integer
lCount = vArray.Columns.Count
ReDim Preserve asOut(1 To lCount)
If vArray.Rows.Count > 1 Then
MAIOR_SEQ = CVErr(xlErrNum)
Exit Function
End If
lSum = 1
i = 1
For Each v In vArray
n = 1
For n = 1 To lCount - 1
If v + n = v.Offset(0, n).Value Then
lSum = lSum + 1
Else
Exit For
End If
Next n
asOut(i) = lSum
lSum = 1
i = i + 1
lCount = lCount - 1
Next v
MAIOR_SEQ = WorksheetFunction.Max(asOut)
End Function
Feche o editor e em alguma coluna à direita dos seus dados insira a fórmula usando esta função, que só tem um argumento que é o intervalo que deseja ver a maior sequencia. Por exemplo:
=MAIOR_SEQ(A2:O2)
Assim fica fácil você identificar a maior sequência, basta usar a função MÁXIMO na coluna com a fórmula (Coluna X no exemplo acima).
Como foi criada uma UDF o arquivo precisará ser salvo como .xlsm.
Abraços!
