Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Преобразование времени в отдельные числа
 
Сразу извиняюсь, если уже было, но я уже искал по всякому...

Суть: в ячейке А1 есть время в виде 80:59:00, нужно это время разбить на отдельные числа в отдельные ячейки в В1 80, в С1 59 и в D1 00.
Попробовал Текст по столбцам, но там сразу преобразует А1 в какую-то полную дату 03.01.1900 08:59:00

Заранее спасибо.
 
Где пример? Переделывать не буду.
Код
Public Sub www()
    Dim a$()
    a = Split([a1].Text, ":")
    [b1].Resize(, UBound(a) + 1) = a
End Sub
Я сам - дурнее всякого примера! ...
 
Или формулами
Код
=ОТБР(A1*24)

Код
=МИНУТЫ(A1)

Код
=СЕКУНДЫ(A1)
 
Pelena, спасибо большое, как раз то, что нужно было. :)
Страницы: 1
Читают тему (гостей: 1)