Macro para colorear filas de diferentes colores
Para dante
Que tal
Podras ayudarme con esto
Tengo este codigo
Dim mirango As Range
Dim mifila As Range
Set mirango = Selection
For Each mifila In mirango.Rows
If mifila.Row Mod 2 = 0 Then
mifila.Interior.ColorIndex = 3
Else
mifila.Interior.ColorIndex = 2
End If
Next mifila
Me colorea las filas de dos colores (una fila de un color y la siguiente de otro color)
Lo que necesito es que comience a colorear a partir de la fila 3
Se podra
2 respuestas
Respuesta de Dante Amor
3
Macro actualizada
Dim mirango As Range Dim mifila As Range Set mirango = Selection For Each mifila In mirango.Rows If mifila.Row > 2 Then If mifila.Row Mod 2 = 0 Then mifila.Interior.ColorIndex = 3 Else mifila.Interior.ColorIndex = 2 End If End If Next mifila
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
Respuesta de ronald montenegro
1
gracias, funciona perfecta