Hola, quiero cambiar el color de una fila entera dependiendo del valor
de una celda en una columna.
Las filas van de A-L y la columna E es el target. Si esta columna tiene
valores "0" quiero que toda la fila se ponga gris, y si es diferente de
cero que vuelva a blanco.
Lo que he hecho es lo siguiente:
- Formato condicional en la columna E:
valor de la celda - igual a - "0%" -- cambia fondo a
gris
valor de la celda - no igual a - "0%" -- cambia fondo a
blanco
- Luego en VB he hecho lo siguiente:
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("E4") =3D 0 Then
Worksheets("Riesgos").Range("A4:L4").Interior.Color =3D RGB(192,
192, 192)
Else
Worksheets("Riesgos").Range("A4:L4").Interior.Color =3D RGB(255,
255, 255)
End If
[Seguramente el formato condicional sobre]. La cuesti=F3n es que esto
que funciona quiero aplicarlo a todas las filas de la hoja, y no se
como. He intentado hacer alg=FAn tipo de bucle del estilo:
'Dim n As Integer
'For n =3D 4 To 50
'If Range("E"$n) =3D 0 Then
'Worksheets("Riesgos").Range(A, L).Interior.Color =3D RGB(192, 192,
192)
'Else
'Worksheets("Riesgos").Range(A, L).Interior.Color =3D RGB(255, 255,
255)
'End If
'Next
Pero no funciona, intento averiguar una forma de poner variables en
Range pero no se como.
=BFMe podr=EDais ayudar??
Gracias
Bookmarks