Ir ao conteúdo
  • Cadastre-se
Entre para seguir isso  
Edsonm13

[Resolvido] > MACRO < Pintar uma forma ao CLICAR

Recommended Posts

Ola Galera,

Já procurei em tudo que lugar sem sucesso.

Gostaria de saber se existe alguma macro que quando eu "click" em um forma ( um retangulo, circulo, triangulo, etc...) ele mude de cor.

Obrigado em ajudar!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Bom dia!!

Supondo que você tem um retângulo, é que ao clicar nele fique vermelho, se clicar de novo fique verde, então

Sub AlterarCorFormasZinhoVBA()
If ActiveSheet.Shapes("Retângulo 1").Fill.ForeColor.RGB = RGB(0, 176, 80) Then
ActiveSheet.Shapes("Retângulo 1").Fill.ForeColor.RGB = RGB(255, 0, 0)
Else
ActiveSheet.Shapes("Retângulo 1").Fill.ForeColor.RGB = RGB(0, 176, 80)
End If
End Sub

Compartilhar este post


Link para o post
Compartilhar em outros sites

Caso o autor necessite, o mesmo será reaberto, para isso deverá entrar em contato com a moderação solicitando o desbloqueio.

Compartilhar este post


Link para o post
Compartilhar em outros sites
Visitante
Este tópico está impedido de receber novos posts.
Entre para seguir isso  





Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações 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

×