• Home
 · 
• Math/Dates
 · 
• A1 Sec2Min

A1 Sec2Min

Convert seconds to minutes with just one line of code. I was encouraged to submit this after seeing where some guy had submitted 50 or so lines of code to do the same thing. This can be expanded to return hours, just follow the logic.

Rate A1 Sec2Min

• 1
• 2
• 3
• 4
• 5

(8(8 Vote))

Dim lSecs As Long
Dim sMin As String
  
lSecs = 120
sMin = Format(Fix(lSecs / 60), "#0") & _
  ":" & Format(lSecs Mod 60, "00")
MsgBox sMin