powered by simpleCommunicator - 2.0.49     © 2025 Programmizd 02
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VBA EXCEL , DATE - преобразование системной даты в строку
9 сообщений из 9, страница 1 из 1
VBA EXCEL , DATE - преобразование системной даты в строку
    #32612368
ПЯРНУ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
После выполнения выражения

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

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

20.07.04 10:35:48

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

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

Scio me nihil scire

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

Scio me nihil scire

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

MsgBox date_str

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

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

Код: plaintext
1.
2.
date_str2 = CStr(Cells( 19 ,  2 ).Value)
MsgBox date_str2 
 
Специально проверил - работает!
...
Рейтинг: 0 / 0
VBA EXCEL , DATE - преобразование системной даты в строку
    #32613115
ПЯРНУ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
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
VBA EXCEL , DATE - преобразование системной даты в строку
    #32613124
ПЯРНУ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
перепечатываю жёлтый текст

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
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VBA EXCEL , DATE - преобразование системной даты в строку
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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