Как преобразовать время в текст

Программирование на Visual Basic for Applications
makssss
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 21.01.2005 (Пт) 13:07

Как преобразовать время в текст

Сообщение makssss » 21.01.2005 (Пт) 13:29

Проблема такая: есть ячейка, тип время (например, ее значение 15:45). Как присвоить значение этой ячейки текстовой переменной, так чтобы значение этой переменной было "15:45".

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 21.01.2005 (Пт) 13:31

Cells(...).Value = Cells(...).Text
Lasciate ogni speranza, voi ch'entrate.

makssss
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 21.01.2005 (Пт) 13:07

Сообщение makssss » 21.01.2005 (Пт) 16:16

Нет, мне нужно не формат ячейки изменить, а присвоить переменной типа string значение из ячейки, формата время.
Т.е. если ячейка A1 имеет значение 14:45:59 (время), то используя такой код:
dim sss as string
sss=range("A1")

значение sss будет равно 0,615266203703704, а мне надо sss="14:45:59"

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 21.01.2005 (Пт) 16:32

Наверное, надо "sss = Range("A1").Text" :?:
Изображение

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 21.01.2005 (Пт) 16:41

Или (если настолько не хочется использовать .Text), то так: sss = Format$(Range("A1").Value, "hh:nn:ss")
Lasciate ogni speranza, voi ch'entrate.

makssss
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 21.01.2005 (Пт) 13:07

Сообщение makssss » 21.01.2005 (Пт) 18:50

Спасибо. Всем пиво 2 раза!


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 60

    TopList