Este fórum está sendo desativado

[Daeron]

Boa tarde!
Preciso da ajuda de vcs para resolver o problema de quando a informação de uma célula for uma formula!

[PietroFarias]

Você quer inserir a formula abaixo na célula D2? Foi o que entendi. Está correto?

Código: Selecionar todos

=SE(A2=HOJE();"ATIVO";"INATIVO")

[osvaldomp]

Via Formatação Condicional não é possível fazer o que você quer.

Me parece que o Excel 2013 traz uma nova função ÉFÓRMULA(), ou se você não tiver essa versão pode ser resolvido via UDF.

[MarcilioLobao]

Daeron, Boa Noite.

Como utilizo o Excel 2007 não sabia se em alguma versão mais recente existia alguma função deste tipo.
A resposta do colega oswaldomp (saudações!) já me esclareceu. Obrigado

Você pode criar um função simples e usá-la dentro de um SE para fazer o que você precisa.

ALT + F11
Crie um Módulo
Insira:

Código: Selecionar todos

Function VerificaFormulaNaCelula(rng As Range) As Boolean
  VerificaFormulaNaCelula = rng.HasFormula
End Function

Agora na célula onde quer colocar a resposta, D2, basta fazer:

=SE(VerificaFormulaNaCelula(B2);"ATIVO";"INATIVO")

Lembre-se de salvar o a planilha com extensão .XLSM para (Macros)

Era isso o que você queria?
Eu espero ter ajudado.
[/color]

[Daeron]

=SE(B2=HOJE();"ATIVO";"INATIVO")

Obrigado, era essa a formula mesmo, eu estava tendo dificuldade na parte da A2=HOJE() , eu estava colando dentro de outro parenteses, uma ultima pergunta, a célula B2 pode ser informada automaticamente já com a informação ATIVO?, melhor exemplificando ao invés de usar a formula HOJE(), nela estaria o resultado da outra formula, ou seria mas para VBA como o nosso amigo MarcilioLobao (Obrigado)sugeriu?, aproveito e solicito essa ajuda tambem ao MarcilioLobao