Показать сообщение отдельно
Старый 01.02.2008, 22:11     # 3
kasha
Member
 
Аватар для kasha
 
Регистрация: 08.08.2005
Адрес: Прибалтика
Пол: Male
Сообщения: 217

kasha Известность не заставит себя ждать
Цитата:
Сообщение от Andy BitOff Посмотреть сообщение
a = TimeValue(Range("A2").Value) b = TimeValue(Range("A1").Value) a = TimeSerial(DateDiff("h", a, b), DateDiff("n", a, b), DateDiff("s", a, b)) Range("A3").NumberFormat = "@" Range("A3").Value = Format(a, "hh:nn:ss")
спасибо конечно, но не мог бы ты обьяснить , что к чему и где это писать?
спасибо
kasha вне форума