Tentei mas não entendi o descrito acima, nem o exemplo disponibilizado

Olá Reinaldo

Vou tentar explicar:
A1 = célula em vermelha devido a formatação condicional que estabeleci.
A dúvida é:
se a célula A1 é vermelha, gostaria que a célula B1 apresentasse o valor 1
se a célula A1 é azul, gostaria que a célula B1 apresentasse o valor 2

Ficou mais claro?

Abs

Se entendi bem você quer que de acordo com a cor da célula o excel calcule algum valor.

Eu já usei este código.

Function gfCelColorName(ByVal vCel As Range) As String
    Application.Volatile
    gfCelColorName = vCel.Interior.Color
End Function

Mas não funciona com formatação condicional!

Bem não vi formatação condicional em seu modelo, então utilizando a mesma formula para aplicação de cor possa aplicar o valor na celula.
Seria algo como B1=Se(formula para vermelho;1;formula para Azul;2;;;;;;)

Boa tarde,

Veja se ajuda, com funções criadas no VBA.

Abraços
Uros