¿Se puede rellenar una fila con un color, de acuerdo a una condición?

A continuación le presento la siguiente imagen.

Necesito una macro que sea capaz de colocarle color amarillo a las filas, tal como se ve en la imagen, siempre y cuando los dígitos de la columna A no pasen de 6 dígitos. Ejemplo: (2),(21),(2135),(233525)

1 respuesta

Respuesta
1

Puedes poner un formato condicional

Utiliza esta fórmula:

=Y(LARGO($A2)<7,LARGO($A2)>0)

La macro:

Sub PonerColor()
  Dim c As Range
  For Each c In Range("A1", Range("A" & Rows.Count).End(3))
    If Len(c.Value) < 7 Then c.Interior.Color = vbYellow
  Next
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas