Notifications
Clear all

Alterar preenchimento e cor da letra ao clicar

3 Posts
2 Usuários
0 Reactions
1,003 Visualizações
(@elielgdc)
Posts: 29
Eminent Member
Topic starter
 

Boa tarde!
Gostaria de saber se é possível ao clicar em determinada célula, a cor de preenchimento e letra se alterarem.
Com um menu cinza e letras brancas, ao clicar em uma célula, queria que ficasse com preenchimento em branco e a letra em cinza, pra dar aquele visual de que eu realmente estou selecionando o botão.

E quando eu tirar a seleção dessa célula, que ela volta ao seu estado de origem.

Segue em anexo um exemplo.

 
Postado : 06/10/2015 10:09 am
(@mprudencio)
Posts: 2749
Famed Member
 

Tenta isso

Na aba da planilha

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = 15
Cells.Font.ColorIndex = 2
Target.Interior.ColorIndex = 2
Target.Font.ColorIndex = 15

End Sub

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 06/10/2015 11:17 am
(@elielgdc)
Posts: 29
Eminent Member
Topic starter
 

Obrigado :D

 
Postado : 06/10/2015 11:41 am