O que eu havia pensado inicialmente seria algo parecido com isso:
Sub formatacao_condicinal()
Dim vDesejados As Range
Set vDesejados = Range(Range("A1"), Range("A65536").End(xlUp))
For Each c In vDesejados
If c < 48:00:00 Then Range("A" & c.Row & ":E" & c.Row).Interior.ColorIndex = 3
Next
End Sub
Mas não tô conseguindo chegar no resultado esperado.
Como eu adaptaria a sua formula aqui?
Postado : 22/10/2015 12:24 pm