Converter segundos no formato HH:MM:SS no Elipse E3

Essa conversão aparentemente parece fácil, aplicando sucessivas divisões. Porém não é tão simples assim, alguns valores podem apresentar valores incorretos quando calcula tempos negativos. Segue abaixo um código que funciona muito bem:

'DEFINE TEMPO TOTAL DE PERDAS DE QUALIDADE
mTempo = Segundos  'Tempo em segundos
' Calcula as horas através do quociente da divisão
mHoras = mTempo \ 3600
' Calcula o número de segundos restantes através do mod
mTempo = mTempo Mod 3600
' Calcula o número de minutos através do quociente da divisão
mMinutos = mTempo \ 60
' Calcula o número de segundos através do mod
mSegundos = mTempo Mod 60
 
HH = E3Format(mHoras,"00") & ":" & E3Format(mMinutos,"00")  & ":" & E3Format(mSegundos,"00")