Mover dados no excel para outras planilhas quando colorir a celula

[wagner braz]

Gostaria de saber se existe alguma possibilidade de eu fazer uma coisa no Excel, eu tenho linhas com dados de clientes, gostaria de saber que se eu pintar a linha de uma cor específica tem como jogar ela pra outra planilha automaticamente ex:
Linha 1da plan1 e de cor branca Ai eu vou e Pinto ela de vermelha, e ela automaticamente vai pra próxima linha em branco da outra planilha no caso plan2 tem como?

[Basole]

Segue um exemplo:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim rng As Range

If Target.Count > 1 Then Exit Sub

If Target.Interior.Color <> 16777215 Then
Set rng = Range(Cells(Target.Row, "A"), Cells(Target.Row, "Z"))
  With Sheets("Plan2")
    lr = .Cells(Rows.Count, 1).End(xlUp).Row + 1
    .Range(.Cells(lr, "A"), .Cells(lr, "Z")).Value = rng.Value
  End With
End If
End Sub