Destaque a célula ativa - dicas do Excel

Índice

Karthik pergunta:

Estou trabalhando em um código de evento para destacar a célula ativa, basicamente mostrar a mudança da cor de fundo da célula ativa. Usei o evento de mudança e isso muda o valor da célula ativa apenas quando o valor é alterado.

Que pergunta legal. O truque é usar o evento de alteração Worksheet_Selection em vez do evento Worksheet_Change. Essa macro de manipulador de eventos especial deve ser inserida no painel de código associado à sua planilha específica. Uma discussão sobre como encontrar isso no painel do projeto está nesta dica arquivada.

Você deve inserir o seguinte código:

Public OldRng As Range Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not OldRng Is Nothing Then OldRng.Interior.ColorIndex = xlNone End If Target.Interior.ColorIndex = 6 Set OldRng = Target End Sub

Este programa usa uma variável pública chamada OldRng para lembrar o último intervalo que foi selecionado, de forma que a cor possa ser redefinida para branco quando você selecionar um novo intervalo.

Artigos interessantes...