Cambiar color a los valores máximos

Necesito que al dar click en un botón que ya tengo, me cambie el color de los valores máximo por cada fila comprendida en el rango G5:I34

Respuesta
2

Te anexo la macro para tu botón

Sub Valores_Maximos()
'Por.Dante Amor
    Set r = Range("G10:I34")
    r.Interior.ColorIndex = xlNone
    For Each f In r.Rows
        Set b = f.Find(WorksheetFunction.Max(f))
        If Not b Is Nothing Then b.Interior.ColorIndex = 6
    Next
End Sub

Sal u doss. R ecuerda valorar la respuesta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas