Agregar a la macro el año en curso

Hay algo que no tuve en cuenta, el error fue mio y que necesito agregar a la macro, me colorea el mes en curso eso esta bien, pero necesito que sea el año en curso también, es decir que coloree

Las fechas del mes y el año en curso unicamente, no los años pasados.

1 respuesta

Respuesta
1

H o l a 

te paso la macro actualizada

Sub Colorear_sumar()
'Act. Aortiz
    For i = 5 To Range("A" & Rows.Count).End(xlUp).Row
        If IsDate(Cells(5, "A")) Then
        fecha1 = Format(Cells(i, "A"), "mm/yyyy")
        fecha2 = Format(Date, "mm/yyyy")
            If fecha1 = fecha2 Then
                Total = Total + Cells(i, "E")
                Cells(i, "A").Interior.ColorIndex = 6
            Else
                Cells(i, "A").Interior.ColorIndex = xlNone
            End If
        End If
    Next
    Range("F2") = Total
    MsgBox "fin"
End Sub

Valora para finalizar saludos!

¡Gracias! Por tu ayuda adriel

adriel te molesto necesito si es posiblel la misma macro pero que en lugar de mes y año en curso,

Me de próximo mes y año en curso, es decir ahora es febrero 2017, que sea marzo de 2017,

Mil gracias

H o l a 

Crea una nueva pregunta mientras preparo la macro

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas