Função personalizada do Excel com IF e cor da célula

Question

Preciso de ajuda com talvez uma função personalizada para o Excel.

Tudo está na foto: (Sim, eu sei que COLOR = YELLOW é um absurdo, mas é apenas um exemplo do que eu acho que poderia resolvê-lo).

FunçãoIFbasicamentebásica.

Porexemplo:

Seacéluladeorigemcontiver"R" sem cor de fundo, faça a célula final F7 e também sem fundo. No entanto, se a célula de origem contiver "R" com cor de fundo amarela, faça a célula final F7 e também a cor de fundo amarela.

Você poderia me ajudar com isso, por favor?

EDITAR:

Eu não sou muito bom em vba, então escrevi algo assim:

Esta é a fórmula básica original:

If (PSANI[@PO2]="R";[@Lokace];"")

E isso eu escrevi para código VBA:

Function ExtendedIF (rng As Range) As String

If (PSANI[@PO2]="R") And (PSANI[@PO2].Interior.ColorIndex = -4142) Then
    ExtendedIf = [@Lokace]
ElseIf (PSANI[@PO2]="R") And (PSANI[@PO2].Interior.ColorIndex <> -4142 Then
    ExtendedIF = [@Lokace] And Interior.ColorIndex = RGB (255, 230, 153)
Else
    ExtendedIf = Nothing
End If
End Function

Você poderia me ajudar com a edição deste código, por favor? Eu não sei escrever corretamente os intervalos relativos.

    

Answer 1

A cor não é dados. Se você colorir manualmente uma célula, a lógica para fazer isso está na sua cabeça, onde o Excel não pode acessá-la. Coloque a lógica da cor na planilha. Então você pode usar a lógica para colorir e também para agregar os dados com fórmulas.