Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Преобразовать промежуток времени в текст? / 6 сообщений из 6, страница 1 из 1
19.07.2007, 11:37:12
    #34669483
Аленочка
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Преобразовать промежуток времени в текст?
Доброго времени суток!

На листе Excel находятся данные по предоставлению услуг сотовой связи:

Услуга Время соединения СуммаИсходящая связь356:42:00153.11Служба сервиса8:42 0Междугородная связь5:00 25.42

На основании этих данных нужно сформировать строку.
Например на основании первой строки таблицы нужно сформировать строку:
автор"Услуга: исходящая связь, время предоставления услуги: 356:42:00, сумма: 153.11"
При формировании строки возникла проблема перевода промежутка времени из формата ч:мм или формата [ч]:мм:сс в текстовый.

Как привести значения второго столбца к текстовому формату?


-----------------------------------------------
А мы тут плюшками балуемся...

Аленочка тм
...
Рейтинг: 0 / 0
19.07.2007, 12:02:24
    #34669599
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Преобразовать промежуток времени в текст?
="Всего "&текст(A1;"ч:мм")&" наговорил"

в макросе

="Всего " & format(range("A1").value, "h:mm") & " наговорил"
могу ошибиться с обозначением секунд - не проверял
...
Рейтинг: 0 / 0
19.07.2007, 12:06:53
    #34669625
Аленочка
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Преобразовать промежуток времени в текст?
Deggasad="Всего "&текст(A1;"ч:мм")&" наговорил"

в макросе

="Всего " & format(range("A1").value, "h:mm") & " наговорил"
могу ошибиться с обозначением секунд - не проверял

у меня был такой вариант, но он не подходит для значений типа "356:42:00", "118:30:00" и иже сними, причем первое число - это всегда минуты, второе секунды ...мне именно в таком виде данные приходят для разбора
...
Рейтинг: 0 / 0
19.07.2007, 12:10:27
    #34669643
Аленочка
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Преобразовать промежуток времени в текст?
Я собираю HTML строку

Код: plaintext
1.
2.
3.
4.
5.
If (.Cells(j,  2 ).NumberFormat = "General") Or IsEmpty(.Cells(j,  2 ).Value) = True Then
                      Str = Str + "<TD width=""20%"" ALIGN = center>" + CStr(col2) + "</TD>" '
                    Else
                      Str = Str + "<TD width=""20%"" ALIGN = center>" + Format(col2, "h:mm") + "</TD>"
                    End If 'второй столбец
                    Str = Str + "<TD width=""20%"" ALIGN = center>" + col3 + "</TD></TR>" 'третий столбец

Дело в том, что формат данных в одном столбце может быть различный, может встречаться как General, так и ч:мм или [ч]:мм:сс


-----------------------------------------------
А мы тут плюшками балуемся...

Аленочка тм
...
Рейтинг: 0 / 0
19.07.2007, 12:12:50
    #34669651
Аленочка
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Преобразовать промежуток времени в текст?

-----------------------------------------------
А мы тут плюшками балуемся...

Аленочка тм
...
Рейтинг: 0 / 0
19.07.2007, 12:52:45
    #34669868
talgat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Преобразовать промежуток времени в текст?
Аленочка Deggasad="Всего "&текст(A1;"ч:мм")&" наговорил"
в макросе
="Всего " & format(range("A1").value, "h:mm") & " наговорил"
могу ошибиться с обозначением секунд - не проверял
у меня был такой вариант, но он не подходит для значений типа "356:42:00", "118:30:00" и иже сними, причем первое число - это всегда минуты, второе секунды ...мне именно в таком виде данные приходят для разбора
Не заметил проблеммы... Прикладываю файл.
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Преобразовать промежуток времени в текст? / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]