Lori ha una serie di numeri, in celle adiacenti, che possono essere positivi o negativi. Vorrebbe un modo per determinare la più grande sequenza di numeri negativi nell’intervallo. Quindi, se ci fossero sette numeri negativi di fila in questa sequenza, vorrebbe una formula che restituisse il valore 7.

Abbiamo guardato in alto e in basso e non riusciamo a trovare una singola formula che faccia ciò che si vuole. Puoi, tuttavia, farlo con una colonna intermedia. Ad esempio, se hai i tuoi numeri nella colonna A (che inizia in A1), potresti inserire la seguente formula nella cella B1:

=IF(A1<0,1,0)

Quindi, nella cella B2 inserisci quanto segue:

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

Copia questo su tutte le altre celle nella colonna B per le quali c’è un valore nella colonna A. Quindi, in una cella diversa (forse cella C1) puoi inserire la seguente formula:

=MAX(B:B)

Questo valore rappresenterà il maggior numero di valori negativi consecutivi nella colonna A.

Se non desideri creare una colonna intermedia per ottenere la risposta, puoi creare una funzione definita dall’utente che restituirà il valore.

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

Per utilizzare la funzione, è sufficiente inserire una formula simile alla seguente nel foglio di lavoro:

= MaxNegSequence(A1:A512)

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (3533) si applica a Microsoft Excel 97, 2000, 2002 e 2003. Puoi trovare una versione di questo suggerimento per l’interfaccia a nastro di Excel (Excel 2007 e versioni successive) qui: