Senhores,
c)Como criar uma macro chamada destaca linha selecionada com cor (conforme abaixo) sendo que tenho várias abas dentro do arquivo por exemplo tenha a plan1 que utilizo a macro abaixo, mais não consigo utilizar a mesma macro na plan2, ou seja entendi que a macro é somente para a plan1.
Dim LinhaSelecAnterior As Range
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Select Case ActiveCell.Row
Case 1, 2
'Coloque neste 'case' as linhas que não devem ser
'destacadas na seleção
'Exemplo: Linhas de título; Aqui eu defini como as linhas 1 e 2
'Remove cor de fundo da linha selecionada anteriormente
Select Case LinhaSelecAnterior.Row
Case Is <> 1, 2
Rows(LinhaSelecAnterior.Row).Interior.ColorIndex = 0
End Select
Case Else
'Altera a cor de fundo da linha selecionada
Rows(ActiveCell.Row).Interior.ColorIndex = 15
'Remove a cor de fundo quando a linha perde a seleção
If Not LinhaSelecAnterior Is Nothing Then
'Verifica se a linha atual já estava selecionada
'neste momento, caso seja uma nova linha selecionada
'remove a cor de fundo.
If ActiveCell.Row <> LinhaSelecAnterior.Row Then
Rows(LinhaSelecAnterior.Row).Interior.ColorIndex = 0
End If
Francisco Ramalho
Postado : 12/07/2013 2:49 pm