Mudar cor da linha no excel automaticamente (VBA)

em

 

  • Altera a cor da linha atual (seleção de uma célula desta linha)
  • Ação vinculada a planilha especifica
  1. Desenvolvedor > Visual Basic
  2. na barra lateral > Planilha1(Planilha1) > Exibir código (botão direito) > Worksheet > SelectionChange
  3. Copiar e colar código abaixo


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveCell.Rows("1:1").EntireRow.Select
ActiveCell.Activate
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 65535
.TintAndShade = 0
.PatternTintAndShade = 0
End With
ActiveCell.Select
End Sub