Como Medir maior atraso excel

[julianoR]

Bom dia Parceiros;

 

Alguém tem uma planilha onde seja possível medir o maior atraso de um jogo sem premiar?

Edited February 5, 2017 by julianoR

[Wata]

Use a função "SE".

 

O EXCEL2010 permite até 64 níveis de aninhamento.

Usando a função "SE", fica algo assim:

 

=SE(X104>=11;0;SE(X103>=11;1;SE(X102>=11;2;SE(X101>=11;3;SE(X100>=11;4;SE(X99>=11;5;SE(X98>=11;6;SE(X97>=11;7;SE(X96>=11;8;SE(X95>=11;9;SE(X94>=11;10;SE(X93>=11;11;SE(X92>=11;12;SE(X91>=11;13;SE(X90>=11;14;SE(X89>=11;15;SE(X88>=11;16;SE(X87>=11;17;SE(X86>=11;18;SE(X85>=11;19;SE(X84>=11;20;SE(X83>=11;21;SE(X82>=11;22;SE(X81>=11;23;SE(X80>=11;24;SE(X79>=11;25;SE(X78>=11;26;SE(X77>=11;27;SE(X76>=11;28;SE(X75>=11;29;SE(X74>=11;30;SE(X73>=11;31;SE(X72>=11;32;SE(X71>=11;33;SE(X70>=11;34;SE(X69>=11;35;SE(X68>=11;36;SE(X67>=11;37;SE(X66>=11;38;SE(X65>=11;39;SE(X64>=11;40;SE(X63>=11;41;SE(X62>=11;42;SE(X61>=11;43;SE(X60>=11;44;SE(X59>=11;45;SE(X58>=11;46;SE(X57>=11;47;SE(X56>=11;48;SE(X55>=11;49;SE(X54>=11;50;SE(X53>=11;51;SE(X52>=11;52;SE(X51>=11;53;SE(X50>=11;54;SE(X49>=11;55;SE(X48>=11;56;SE(X47>=11;57;SE(X46>=11;58;SE(X45>=11;59;SE(X44>=11;60;SE(X43>=11;61;SE(X42>=11;62;SE(X41>=11;63;SE(X40>=11;64;0)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))

 

Pode ser que exista alguma outra forma, mas o que eu consegui foi isso aí (monitorar até 64 atrasos; e neste caso específico é pra saber se um jogo foi premiado, ou seja, >=11).

 

...

 

[julianoR]

2 horas atrás, Wata disse:

Use a função "SE".

 

O EXCEL2010 permite até 64 níveis de aninhamento.

Usando a função "SE", fica algo assim:

 

=SE(X104>=11;0;SE(X103>=11;1;SE(X102>=11;2;SE(X101>=11;3;SE(X100>=11;4;SE(X99>=11;5;SE(X98>=11;6;SE(X97>=11;7;SE(X96>=11;8;SE(X95>=11;9;SE(X94>=11;10;SE(X93>=11;11;SE(X92>=11;12;SE(X91>=11;13;SE(X90>=11;14;SE(X89>=11;15;SE(X88>=11;16;SE(X87>=11;17;SE(X86>=11;18;SE(X85>=11;19;SE(X84>=11;20;SE(X83>=11;21;SE(X82>=11;22;SE(X81>=11;23;SE(X80>=11;24;SE(X79>=11;25;SE(X78>=11;26;SE(X77>=11;27;SE(X76>=11;28;SE(X75>=11;29;SE(X74>=11;30;SE(X73>=11;31;SE(X72>=11;32;SE(X71>=11;33;SE(X70>=11;34;SE(X69>=11;35;SE(X68>=11;36;SE(X67>=11;37;SE(X66>=11;38;SE(X65>=11;39;SE(X64>=11;40;SE(X63>=11;41;SE(X62>=11;42;SE(X61>=11;43;SE(X60>=11;44;SE(X59>=11;45;SE(X58>=11;46;SE(X57>=11;47;SE(X56>=11;48;SE(X55>=11;49;SE(X54>=11;50;SE(X53>=11;51;SE(X52>=11;52;SE(X51>=11;53;SE(X50>=11;54;SE(X49>=11;55;SE(X48>=11;56;SE(X47>=11;57;SE(X46>=11;58;SE(X45>=11;59;SE(X44>=11;60;SE(X43>=11;61;SE(X42>=11;62;SE(X41>=11;63;SE(X40>=11;64;0)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))

 

Pode ser que exista alguma outra forma, mas o que eu consegui foi isso aí (monitorar até 64 atrasos; e neste caso específico é pra saber se um jogo foi premiado, ou seja, >=11).

 

...

 

Valeu amigo, é isso mesmo, vou tentar adaptar na minha planilha.

[pedrosaavas]

Oi JulianoR,

 

Crie duas funções que talvez lhe ajude.

 

'Atraso - Reinicia a contagem após qualquer dezena

Function Atraso(rng As Range)
Dim cel As Range
Dim lContar

lContar = 0
For Each cel In rng
   If IsNumeric(cel.Value) And cel.Value = "" Then
      lContar = lContar + 1
   Else: lContar = 0
   End If
Next cel
Atraso = lContar

End Function

 

'Atraso2 - Reinicia a contagem somente após a dezena escolhida
Function Atraso2(rng As Range, valor As Integer)
Dim cel As Range
Dim lContar

lContar = 0
For Each cel In rng
   If IsNumeric(cel.Value) And cel.Value <> valor Then
      lContar = lContar + 1
   Else: lContar = 0
   End If
Next cel
Atraso2 = lContar
End Function
 

 

Atraso.xlsm

[julianoR]

31 minutos atrás, pedrosaavas disse:

Oi JulianoR,

 

Crie duas funções que talvez lhe ajude.

 

'Atraso - Reinicia a contagem após qualquer dezena

Function Atraso(rng As Range)
Dim cel As Range
Dim lContar

lContar = 0
For Each cel In rng
   If IsNumeric(cel.Value) And cel.Value = "" Then
      lContar = lContar + 1
   Else: lContar = 0
   End If
Next cel
Atraso = lContar

End Function

 

'Atraso2 - Reinicia a contagem somente após a dezena escolhida
Function Atraso2(rng As Range, valor As Integer)
Dim cel As Range
Dim lContar

lContar = 0
For Each cel In rng
   If IsNumeric(cel.Value) And cel.Value <> valor Then
      lContar = lContar + 1
   Else: lContar = 0
   End If
Next cel
Atraso2 = lContar
End Function
 

 

Atraso.xlsm

valeu!!