¿Como sumar las horas en macros?

Estoy realizando una macro que me ayude a sumar la duración de mis actividades en formato hora.

P. Ej. 0:30 + 03:00 = 03:30.

El problema es que la macro que hice no realiza la operación de suma (00:30 + 03:00 = 00:00), solo funciona si lo hago con numeros normales (p. Ej. 90 + 80 = 120). Quisiera que me ayuden con eso por favor.

Sub Contar()

Cells(Rows.Count, 2).End(xlUp).Select
Range(Selection, Selection.End(xlUp)).Select
ActiveCell.Offset(0, 0).Select

Dim i As Integer
Dim Cultural As Integer
Dim Access As Integer
Dim Tesis As Integer
Cultural = 0
Access = 0
Tesis = 0

For i = ActiveCell.Row To Cells(Rows.Count, 2).End(xlUp).Row

  If Cells(i, 2).Interior.Color = RGB(189, 215, 238) Then
        Cultural = Cultural + Cells(i, 2).Value
    ElseIf Cells(i, 2).Interior.Color = RGB(208, 206, 206) Then
        Access = Access + Cells(i, 2).Value
    ElseIf Cells(i, 2).Interior.Color = RGB(255, 255, 0) Then
       Tesis = Tesis + Cells(i, 2).Value
  End If
Next

Cells(3, 4) = Cultural
Cells(4, 4) = Access
Cells(5, 4) = Tesis

End Sub