Ir ao conteúdo
  • Cadastre-se
Entre para seguir isso  
Rodrigo Leandro Butigeli

Ativar macro ao clicar em uma célula no excel

Recommended Posts

boa tarde pessoal, tenho uma planilha de pontuação e preciso de uma macro que configure uma certa formação (cor) quando clico em algumas células. estou enviando a planilha com as idéias de soma que tive (somando as células coloridas de preto) usando o pincel de formatação funciona bem, existe uma maneira mais fácil?

usei essa macro para somar a cor:

 

Public Function SOMACOR(Cor As Range, Intervalo As Range) As Double
Dim i As Range
For Each i In Intervalo
If i.Interior.Color = Cor.Interior.Color Then
SOMACOR = SOMACOR + i.Value
End If
Next
Application.Volatile
End Function

 

defino uma cor para as células que devem ter seu valor somado o que me falta é uma maneira de clicar na célula desejada e ela mudar para essa cor.

 

 

 

nessa macro dando duplo clic adiciona um "." na celula, tem como alterar para que a célula fique toda preta e a fonte branca?

 

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
ActiveCell = "•"
End Sub

 

desde já agradeço

 

Planilha Pontuação.xlsx

Editado por Rodrigo Leandro Butigeli
Botão CODE <>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora
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

×