Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.05.2011, 15:51   #1
Nebojitel
Пользователь
 
Регистрация: 27.05.2011
Сообщений: 26
По умолчанию Формат времени

Здравствуйте.
Есть простенькая формула вычисляющая время пути в зависимости от скорости и расстояния. конечный результат отображается в секундах.

Как сделать так чтоб результат представлялся в минутах и секундах? т.е. 80 сек. отображалось как 1 мин 20 сек.

Пробовал в формате ячейки поставить "Время", ерунда получается.
Nebojitel вне форума Ответить с цитированием
Старый 27.05.2011, 16:08   #2
motorway
Участник клуба
 
Регистрация: 28.06.2009
Сообщений: 1,950
По умолчанию

Например, "обвернуть" аргумент в такую функцию, которую можно объявить в модуле:
Код:
Function MinSec(Sec As Integer)
MinSec = Int(Sec / 60) & " мин " & Sec - 60 * Int(Sec / 60) & " сек"
End Function
motorway вне форума Ответить с цитированием
Старый 27.05.2011, 16:09   #3
Казанский
Старожил
 
Аватар для Казанский
 
Регистрация: 31.12.2010
Сообщений: 2,133
По умолчанию

Если формула выдает значение в секундах, поделите на 86400 (число секунд в сутках). Потому что в Экселе единица времени - сутки.
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Казанский вне форума Ответить с цитированием
Старый 27.05.2011, 19:11   #4
Nebojitel
Пользователь
 
Регистрация: 27.05.2011
Сообщений: 26
По умолчанию

Надеялся, что можно стандартными функциями обойтись. В Excel я плохо разбираюсь, только стандартные вещи. Попробовал через Ctrl+F11 зайти в редактор, вставил данный код, сохранил. В макросах появилось название MinSec и что дальше не пойму... в гугле толкового ничего не нашел. Везде пишут что создаешь и все. А куда зайти чтоб создать, как сохранить и как использовать потом не пишут, наверно для всех это само собой разумеющиеся.
Nebojitel вне форума Ответить с цитированием
Старый 27.05.2011, 19:19   #5
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

добавте в Вашу формулу /86400. получите результат в сутках.
задайте ячейке формат мм" мин. "сс" сек." - получите то, что хотели.
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 27.05.2011, 19:29   #6
motorway
Участник клуба
 
Регистрация: 28.06.2009
Сообщений: 1,950
По умолчанию

Вызов редактора - Alt+F11 - Insert - Module.
Далее в ячейке можно написать =MinSec(80), и в ней появится "1 мин 20 сек"
motorway вне форума Ответить с цитированием
Старый 27.05.2011, 21:25   #7
The_Prist
Участник клуба
 
Аватар для The_Prist
 
Регистрация: 17.07.2009
Сообщений: 1,088
По умолчанию

Подробнее про создание пользовательских функций(UDF)
WebMoney - R298726502453; Яндекс.Деньги - 41001332272872
www.excel-vba.ru
The_Prist вне форума Ответить с цитированием
Старый 27.05.2011, 22:19   #8
Nebojitel
Пользователь
 
Регистрация: 27.05.2011
Сообщений: 26
По умолчанию

Большое спасибо за ответы, самое главное очень оперативно)
IgorGO всё получилось.
motorway дальше поковыряю, думаю срастется.
The_Prist спс за ссылу.
Nebojitel вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как преобразовать в формат времени SergeyK Microsoft Office Excel 2 10.11.2010 14:14
переход из числа на формат времени maksvas Microsoft Office Excel 3 29.10.2010 10:29
Формат времени ruavia3 Microsoft Office Excel 3 15.03.2010 11:30
Формат времени artemavd Общие вопросы Delphi 6 22.09.2009 15:23
формат упакованного времени в DELPHI dimonbest Общие вопросы Delphi 32 23.09.2008 02:15