"Valor K-ésimo" - Função matricial

"Basta sermos simples para sermos ricos em nossos atos!" (E.S.P.)
----------

=MENOR((A1:A7);{2;3})

Finalize com "CTRL + SHIFT + ENTER".
Resultará:

{=MENOR((A1:A7);{2;3})}

----------
Maiores esclarecimentos, acesse o link que está no título deste post !

"Cont.se" com dois critérios - Função Matricial

"Basta sermos simples para sermos ricos em nossos atos!" (E.S.P.)
----------

Supondo que temos o intervalo "A1:A7" com valores de 1 a 7 respectivamente.
Por intermédio de função matricial poderemos contar um intervalo com dois critérios:

{=CONT.SE(A1:A7;1)+CONT.SE(A1:A7;3)}

Nesse exemplo, temos como resultado a contagem dos valores iguais a 1 e 3.

********
Sempre antes de finalizar a função matricial, usar "CTRL + SHIFT + ENTER".

----------
"O potencial humano só é medido por intermédio dos atos!" (E.S.P.)

Contar a cor do preenchimento

"Basta sermos simples para sermos ricos em nossos atos!" (E.S.P.)
----------

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'
'Autor: Eneias dos Santos Pedroso
'
Dim i As Object
Dim Intervalo As Range
Set Intervalo = Range("A1:C10")
'Intervalo onde estão as células na cor vermelha
For Each i In Intervalo
If CorFundo(i) = 3 Then ' [ 3 ]= Vermelho
qtde = qtde + 1
End If
Next i
[D1] = qtde
'Célula que receberá a informação de quantas repetições houve
End Sub

Function CorFundo(vRange As Range)
If Selection.Areas.Count = 1 Then
CorFundo = vRange.Interior.ColorIndex
Else
CorFundo = Null
End If
End Function

----------
Maiores esclarecimentos, acesse o link que está no título deste post !