¿Como se suma una hora automática con otra estática?

Deseo sumar una hora estática con una automática pero que el resultado de ambas siga siendo automático conforme va pasando el tiempo.

- Para este caso hora automática:

Sub Meurelogio()
If inicio = True Then
UserForm17.lb1horaa.Text = Time
Application.OnTime Now() + TimeValue("00:00:01"), "Meurelogio"
End If
End Sub

Sub IniciarRelogio()
inicio = True
Call Meurelogio
End Sub

Sub PararRelogio()
inicio = False
End Sub

- Hora estática

textbox17 = time (este valor no tiene mucha importancia, ya que es el que deseo).

- Diferencia de horas

diferencia1 = TimeValue(lb1horaa) - TimeValue(TextBox17)
Me.diferencia1 = Format(Me.diferencia1, "HH:MM:SS")

Utilizando estos códigos obtengo una diferencia de hora estática pero yo quiero que se vaya actualizando de acuerdo al lb1horaa.Text

Agradezco la ayuda :D