Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / "[$-419]mmmm;@" форматирование не отрабатывает / 6 сообщений из 6, страница 1 из 1
09.02.2010, 16:46
    #36458306
SuperJur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
"[$-419]mmmm;@" форматирование не отрабатывает
Доброе время суток спряниками и сблинами!

Делаю

Set R = conn.Execute("select * from F_B01('" & D1 & "','" & D2 & "') order by F1")
Row = 2
While Not R.EOF
With Target.Range("$A$1").Offset(Row, 0)
.Value = "01." & R(0) & "." & Год
.NumberFormat = "[$-419]mmmm;@"
...
но после выполнения программы в поле остается 01.01.2009. Но если перейти в режим редактирования и нажать Enter формат становится "Январь", какой и требуется.

Как сделать так, чтобы сразу было "Январь" ?

Удачи!
...
Рейтинг: 0 / 0
09.02.2010, 16:50
    #36458324
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
"[$-419]mmmm;@" форматирование не отрабатывает
SuperJur,

а если строки
.Value = "01." & R(0) & "." & Год
.NumberFormat = "[$-419]mmmm;@"

поменять местами?
...
Рейтинг: 0 / 0
09.02.2010, 17:06
    #36458400
SuperJur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
"[$-419]mmmm;@" форматирование не отрабатывает
ничего не изменилось
...
Рейтинг: 0 / 0
09.02.2010, 18:57
    #36458694
vlth
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
"[$-419]mmmm;@" форматирование не отрабатывает
SuperJur,

.Value = Format("01.01.2009", "dd mmmm yy") 'Получаем в ячейке '01 января 09'
...
Рейтинг: 0 / 0
10.02.2010, 10:23
    #36459537
SuperJur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
"[$-419]mmmm;@" форматирование не отрабатывает
Спасибо! :-)

.Value = Format("01." & R(0) & "." & Год, "mmmm")

отрабатывает как надо...
...
Рейтинг: 0 / 0
10.02.2010, 11:00
    #36459677
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
"[$-419]mmmm;@" форматирование не отрабатывает
SuperJurСпасибо! :-)

.Value = Format("01." & R(0) & "." & Год, "mmmm")

отрабатывает как надо...

Но теперь в ячейке уже не дата, а текст, так что датовые операции с ней делать не получится. Но если это и не нужно, тогда годится.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / "[$-419]mmmm;@" форматирование не отрабатывает / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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