Macro con excel para sumar valores repetidos

En una hoja "jennifer-cronograma-3" tengo los datos y La idea es que en la Hoja1 copie la fecha, país y mantenimiento. En la hoja1 debe sumar los valores Si la fecha y el país ya están.

Tabla de datos

adjunto el código de la macro. En la hoja1 copia los valores que cumplen la condición, pero no he podido hacer que haga la suma de acuerdo a lo que se necesita.

Sub mM()
Dim fechaM As Date
Dim paisM As String

Dim ultimaFila As Long
Dim ultimaFilaHoja1 As Long
Dim contador As Long

Dim fecha1 As Date
Dim fechaToFind As Date

Dim result As Double

ultimaFila = Sheets("jennifer-cronograma-3").Range("B" & Rows.count).End(xlUp).Row

If ultimaFila < 4 Then
    Exit Sub
End If


For contador = 4 To ultimaFila
            
    If IsDate(Sheets("jennifer-cronograma-3").Cells(contador, 5)) = True And Sheets("jennifer-cronograma-3").Cells(contador, 4) <> "" Then
        'mtto
        fechaM = Sheets("jennifer-cronograma-3").Cells(contador, 5)
        paisM = Sheets("jennifer-cronograma-3").Cells(contador, 4)
        'm = Sheets("jennifer-cronograma-3").Cells(contador, 1)

        ultimaFilaHoja1 = Sheets("Hoja1").Range("B" & Rows.count).End(xlUp).Row

            If IsNumeric(Sheets("jennifer-cronograma-3").Cells(contador, 1)) = True Then
                resultado = resultado + Sheets("jennifer-cronograma-3").Cells(contador, 1)
            
                
                
                Sheets("Hoja1").Cells(ultimaFilaHoja1 + 1, 1) = fechaM
                Sheets("Hoja1").Cells(ultimaFilaHoja1 + 1, 2) = paisM
                Sheets("Hoja1").Cells(ultimaFilaHoja1 + 1, 3) = resultado

                Else
                Sheets("Hoja1").Cells(ultimaFilaHoja1 + 1, 3) = 0
            End If
               
        End If
    Next contador

End Sub