The duration of a timed task in seconds can be determined by the DateDiff function. To present the result in a user friendly format, pass the DateDiff result to this function.
Private Function ConvertSecondsToHHMMSS(lSeconds As Long) As String Dim curMinutes As Currency Dim curHours As Currency Dim sSeconds As String Dim sMinutes As String Dim sHours As String If lSeconds < 1 Then ConvertSecondsToHHMMSS =