• sf
  • Восстановленный участник
  • На форуме с 5 марта 2005г.
  • Сообщений: 46
  • Спасибо: 0

Тема: Как преобразовать секунды в часы и минуты?

VBA
как преобразовать секунды (357 сек) в часы и мин

  • Leonid
  • Восстановленный участник
  • На форуме с 16 июня 2003г.
  • Сообщений: 389
  • Спасибо: 0

Re: Как преобразовать секунды в часы и минуты?

Можно использовать функцию TimeSerial:

MsgBox TimeSerial(0, 0, 357)

Но из результата надо будет отбросить условные 12:00:00.
Как это сделать программно, не придумал...

  • olegovic
  • Восстановленный участник
  • На форуме с 15 октября 2004г.
  • Сообщений: 9
  • Спасибо: 0

Re: Как преобразовать секунды в часы и минуты?

Зачем использовать какие-то функции? Решение занимает 3 строчки:

myTime = 357
seconds = myTime Mod 60
minutes = (myTime - seconds) / 60

Думаю, что смысл понятен, с часами справитесь сами ;)

  • Leonid
  • Восстановленный участник
  • На форуме с 16 июня 2003г.
  • Сообщений: 389
  • Спасибо: 0

Re: Как преобразовать секунды в часы и минуты?

> olegovic
Воля ваша, но это больше похоже на упражнения по арифметике, чем на программирование и не расширяет профессиональный кругозор участников.