Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 14.01.2011, 12:39   #1
yursanch
Пользователь
 
Регистрация: 13.04.2010
Сообщений: 17
По умолчанию Отмена преобразования текста в дату

Всем привет. Не могу сообразить, как решить вроде бы простейший вопрос. Мне нужен список вида 1 января, 2 января и т.д.
Код, которым делаю запись:
Dim mes As String
mes="января"
For i =1 to 31
wbd.Sheets("Параметры").Cells(20 + i, 1) = i & " " & mes
Next
А в итоге получаю 01.янв, 02.янв и т.д.
Форматирование типа .NumberFormat = "@" не помогает.
Как отменить это преобразование? Заранее спасибо.
yursanch вне форума Ответить с цитированием
Старый 14.01.2011, 12:41   #2
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Сперва задать .NumberFormat = "@" , а уж затем помещать данные не пробовали?
Или влепите впереди апостроф:
.Cells(20 + i, 1) = "'" & i & " " & mes
webmoney: E265281470651 Z422237915069 R418926282008

Последний раз редактировалось Hugo121; 14.01.2011 в 12:45.
Hugo121 вне форума Ответить с цитированием
Старый 14.01.2011, 12:46   #3
yursanch
Пользователь
 
Регистрация: 13.04.2010
Сообщений: 17
По умолчанию

Пробовал, убивает "января", оставляя только цифры.
Из i & "-" & mes получаю 1-, апостроф не помог.

Последний раз редактировалось yursanch; 14.01.2011 в 12:53.
yursanch вне форума Ответить с цитированием
Старый 14.01.2011, 12:50   #4
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Как это? Я попробовал - и формат годится, и апостроф...
Правда у меня Эксель нерусский
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 14.01.2011, 13:08   #5
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

столбцу присвоить формат "текстовый" и заполнять
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 14.01.2011, 13:09   #6
yursanch
Пользователь
 
Регистрация: 13.04.2010
Сообщений: 17
По умолчанию

Уфф. Заработало. Hugo, cпасибо. Я ошибся при форматироании, осел .
yursanch вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Закрыть, Отмена. agregator Microsoft Office Excel 6 12.02.2010 09:56
Отмена в ColorDialog'е Marsel737 Общие вопросы Delphi 5 24.11.2009 16:09
Выделить дату и номер договора из текста S_M Microsoft Office Excel 6 04.09.2009 17:46
Отмена попапа SONce Общие вопросы Delphi 1 18.04.2009 06:48
Отмена запроса на сохранение SlipKorn Microsoft Office Excel 1 14.06.2007 00:17