macro en excel para cambiar color a una fila

[ing_aprendiz]

Hola amigos foreros. el caso es que estoy tratando de hacer una macro en excel que me permita cambiar el color de todos los datos de una fila si se cumple una condición, en este caso si el valor de la celda es "si". Hasta el momento lo que he hecho es lo siguiente:

Sub Cambiar_Colorvba()

For Each Cell In Selection

If Cell = si Then

Cell.Select
ancla = ActiveCell.Address
ActiveCell.End(xlToRight).Select
Range(ancla, ActiveCell).Select
Selection.Font.ColorIndex = 3

End If

Next

End Sub

el caso es que cuando ejecuto la macro no me funciona alguno de ustedes podria decirme donde esta el error o como podria hacer esto, es la primera vez que trato de hacer una macro les agrdeceria la ayuda prestada.

chao