Este fórum está sendo desativado

[Angra]

Bom dia
Como mostrar o valor de uma célula formatada com efeito parecido ao obtido com a barra de formula

[babdallas]

Não entendi. Ppderia explicar com mais detalhe, por favor?

[Angra]

Quando você posiciona o "ponteiro" do mouse ou não em uma célula e houver um valor ali, além da leitura direta na célula, é possível vê esse valor na barra de formulas.



Então só quero lê o conteúdo daquela célula, sem precisar abrir a barra de endereço e também porque aquele intervalo (meu caso) estar sob formatação total (interior color e font color)

[babdallas]

Vamos ver se entendi. Você quer que ao selecionar uma célula, verifique se a sua cor interior é igual a cor da fonte. Caso seja, colocar o valor da célula na célula AB3?

[Angra]

Não é isso não.
Quando eu selecionar uma célula, quero ver seu conteúdo em AB3, do mesmo modo que veria na barra de formula.

[babdallas]

Se você ver o conteúdo de qualquer célula, então salve a planilha com extensão xlsm ou xlsb e coloque o seguinte código VBA na planilha que você quer o conteúdo na célula B3.

Código: Selecionar todos

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Planilha1.Range("AB3").Value = Target.Value
End Sub

NO meu exemplo, Planilha1 é o nome VBA (codename) da planilha que estão os dados.

[Angra]

Pronto, questão resolvida.
grato