Lori tiene una serie de números, en celdas adyacentes, que pueden ser positivos o negativos. Le gustaría una forma de determinar la secuencia más grande de números negativos en el rango. Por lo tanto, si hubiera siete números negativos seguidos en esta secuencia, le gustaría una fórmula que devolviera el valor 7.

Hemos mirado alto y bajo y no podemos encontrar una fórmula única que haga lo que se desea. Sin embargo, puede hacerlo con una columna intermedia. Por ejemplo, si tiene sus números en la columna A (comenzando en A1), entonces podría poner la siguiente fórmula en la celda B1:

=IF(A1<0,1,0)

Luego, en la celda B2 ingrese lo siguiente:

=IF(A2<0,B1+1,0)

Copie esto en todas las demás celdas de la columna B para las que hay un valor en la columna A. Luego, en una celda diferente (quizás la celda C1), puede poner la siguiente fórmula:

=MAX(B:B)

Este valor representará el mayor número de valores negativos consecutivos en la columna A.

Si no desea crear una columna intermedia para obtener la respuesta, puede crear una función definida por el usuario que devolverá el valor.

Function MaxNegSequence(rng As Range)

' search for the largest sequence ' of negative numbers in the range

Dim c As Range     Dim lCounter As Long     Dim lMaxCount As Long       Application.Volatile     lCounter = 0     lMaxCount = 0     On Error Resume Next     For Each c In rng.Cells         If c.Value < 0 Then             lCounter = lCounter + 1             If lCounter > lMaxCount Then                 lMaxCount = lCounter             End If         Else             lCounter = 0         End If     Next c       MaxNegSequence = lMaxCount End Function

Para usar la función, simplemente coloque una fórmula similar a la siguiente en su hoja de trabajo:

= MaxNegSequence(A1:A512)

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (11105) se aplica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 y Excel en Office 365. Puede encontrar una versión de este consejo para la interfaz de menú anterior de Excel aquí:

link: / excel-Counting_Consecutive_Negative_Numbers [Contando números negativos consecutivos].