Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VBA EXCEL , DATE - преобразование системной даты в строку / 9 сообщений из 9, страница 1 из 1
20.07.2004, 12:56:39
    #32612368
ПЯРНУ
ПЯРНУ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA EXCEL , DATE - преобразование системной даты в строку
После выполнения выражения

Код: plaintext
Cells( 19 ,  2 ).Formula = Now

в ячейку записано

20.07.04 10:35:48

Как преобразовать в строку,
допустим "20.07.04 10:35:48"

СПАСИБО
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.07.2004, 13:00:14
    #32612379
Jojo
Jojo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA EXCEL , DATE - преобразование системной даты в строку
Cstr() ...

Scio me nihil scire

<<Jojo®>>
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.07.2004, 13:02:00
    #32612391
Jojo
Jojo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA EXCEL , DATE - преобразование системной даты в строку
date_=Cells(19, 2).Value
date_str=Cstr(date_str)

Scio me nihil scire

<<Jojo®>>
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.07.2004, 15:00:58
    #32612831
ПЯРНУ
ПЯРНУ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA EXCEL , DATE - преобразование системной даты в строку
Код: plaintext
1.
date_ = Cells( 19 ,  2 ).Value
 date_str = CStr(date_str)

MsgBox date_str

Код: plaintext
выведено   0 : 00 : 00
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.07.2004, 15:09:49
    #32612854
Yanis
Yanis
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA EXCEL , DATE - преобразование системной даты в строку
Потому что должно быть наверное вот так:
Код: plaintext
1.
2.
date_ = Cells( 19 ,  2 ).Value
date_str = CStr(date_)
Или сразу так:
Код: plaintext
1.
date_str = CStr(Cells( 19 ,  2 ).Value)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.07.2004, 15:37:12
    #32612953
ПЯРНУ
ПЯРНУ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA EXCEL , DATE - преобразование системной даты в строку
Yanis , ПУСТО ВЫВОДИТ

Код: plaintext
1.
2.
date_str2 = CStr(Cells( 19 ,  2 ).Value)
MsgBox date_str2
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.07.2004, 15:55:21
    #32613033
Yanis
Yanis
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA EXCEL , DATE - преобразование системной даты в строку
ПЯРНУYanis , ПУСТО ВЫВОДИТ

Код: plaintext
1.
2.
date_str2 = CStr(Cells( 19 ,  2 ).Value)
MsgBox date_str2
Специально проверил - работает!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.07.2004, 16:16:45
    #32613115
ПЯРНУ
ПЯРНУ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA EXCEL , DATE - преобразование системной даты в строку
Yanis,

Я НЕ ПРАВ, ИЗВИНИ,
Я ПРОПУСТИЛ начальную строку
конечный код таков:

Код: plaintext
1.
2.
3.
Cells( 19 ,  2 ).Formula = Now
    date_str2 = CStr(Cells( 19 ,  2 ).Value)
'+    MsgBox date_str2
MsgBox "qqqqqqqq  " + date_str2

БОЛЬШОЕ СПАСИБО ,

Yanis,

и всем, кто мне помогал.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.07.2004, 16:19:53
    #32613124
ПЯРНУ
ПЯРНУ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA EXCEL , DATE - преобразование системной даты в строку
перепечатываю жёлтый текст

Yanis,

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Я НЕ ПРАВ, ИЗВИНИ,
Я ПРОПУСТИЛ начальную строку
конечный код таков:

Cells( 19 ,  2 ).Formula = Now
    date_str2 = CStr(Cells( 19 ,  2 ).Value)
'+    MsgBox date_str2
MsgBox "qqqqqqqq  " + date_str2


БОЛЬШОЕ СПАСИБО ,

Yanis,

и всем, кто мне помогал.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VBA EXCEL , DATE - преобразование системной даты в строку / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 502ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2186705]:
 0ms
get settings:
 7ms
get forum list:
 10ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 207ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 30ms
get tp. blocked users:
 1ms
others: 229ms
total:  502ms
x
x
Закрыть


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