Ir ao conteúdo
  • Cadastre-se

Destacar Célula Ativa no EXCEL


katito41

Posts recomendados

Postado

Olá pessoal!

Existe alguma maneira de ressaltar com alguma cor diferente, seja no contorno ou preenchimento de cor, a célula ativa no excel 2003 ?

Não quero ressaltar toda a coluna e linha, mas apenas o campo da célula onde se encontra o cursor, ou seja, a célula ativa naquele momento.

Além disso ela não pode apagar o fundo de cor que por acaso possa existir em alguma planilha.

Feliz 2011 a todos os colaboradores do fórum.

Abraço.

Katito41

Postado

Caro Patropi, boa noite!

Esse código VBA eu já havia visto, porém não me serve.

Nesse exemplo do link mencionado somente a linha fica realçada.

O que eu preciso é que somente a célula ativa fique realçada (o ponto de encontro entre a linha e a coluna que o cursor estiver).

Valeu a ajuda.

Abraço e boa semana.

katito41

Postado

cole o código abaixo no módulo da planilha

o código utiliza as células A1 e A2 para armazenar valores, se quiser altere para outros endereços

Option Explicit
Public celAnt As String
Public corAnt As Integer

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub

On Error Resume Next
If celAnt = "" Then
celAnt = Range("A2").Value
corAnt = Range("A1").Value
Range(celAnt).Interior.ColorIndex = corAnt
corAnt = Target.Interior.ColorIndex
Range("A1").Value = corAnt
Target.Interior.Color = vbYellow
celAnt = Target.Address
Range("A2").Value = celAnt

Else

Range(celAnt).Interior.ColorIndex = corAnt
corAnt = Target.Interior.ColorIndex
Range("A1").Value = corAnt
Target.Interior.Color = vbYellow
celAnt = Target.Address
Range("A2").Value = celAnt
End If

End Sub

Postado

Amigo Osvaldomp, boa tarde!

Funcionou corretamente. Era isso mesmo que eu estava procurando.

Agradeço e desejo um feliz 2011.

Dou o tópico por resolvido e encerrado.

katito41

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

Black Week Clube do Hardware

 

CLIQUE AQUI E CONFIRA!