IMHO.WS

IMHO.WS (http://www.imho.ws/index.php)
-   Программирование (http://www.imho.ws/forumdisplay.php?f=40)
-   -   Excel посимвольное чтение (http://www.imho.ws/showthread.php?t=129027)

kasha 01.02.2008 17:24

Excel посимвольное чтение
 
подскажите пожалуйста:

у меня есть теблица из трёх ячеек. с данными следующего формата:
A1)01.01.2008 00:03:52
A2)01.01.2008 00:08:30
A3)а сюда надо вывести результат, который покажет кол-во минут, если 01.01.2008 00:08:30 - 01.01.2008 00:03:52, т.е. число равное 00:04:38 или просто 04:38 . Вообщем чтоб он дату не считывал, а только подсчитал разницу времени.
Подскажите умные люди! кто с excel дружит?

Andy BitOff 01.02.2008 19:41

Код:

  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 01.02.2008 22:11

Цитата:

Сообщение от Andy BitOff (Сообщение 1517469)
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")

спасибо конечно, но не мог бы ты обьяснить , что к чему и где это писать?
спасибо

Andy BitOff 02.02.2008 13:36

Ох нехотелось за флейм еще (хотя и первый-то спорный) минус получать, но видимо придется. Интересно получается, будет у меня 2 сообщения и при этом 2 наказания за флейм.

Цитата:

Сообщение от kasha (Сообщение 1517497)
но не мог бы ты обьяснить , что к чему и где это писать?

Встречный вопрос. Когда Вы создавали ветку, то назвали ея "Excel посимвольное чтение", как Вы себе представляли реализацию этого и где Вы думали это писать? Или, как и большинству халявщиков, Вам недостаточно даже почистить морковку, Вам ее еще и расжевать надо?

А по существу, Alt+F11, F1. Если Вам удастся решить этот незамысловатый ребус, то, возможно, еще не всё потеряно.


Часовой пояс GMT +4, время: 18:57.

Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.