Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ввод текста в ячейку / 7 сообщений из 7, страница 1 из 1
01.06.2015, 14:44
    #38973355
Alex37
Alex37
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ввод текста в ячейку
Всем привет!

Столкнулся с неприятным моментом, при вводе в ячейки листа текста из массива, типа "2070/1/1", введенный текст превращается в дату: 01.01.2070. На самом деле запись "2070/1/1" это номер счета, номер отдела и номер изделия.
Книга, куда вводится текст, создается программно.
Мне требуется оставить запись как есть: "2070/1/1"
Ввод данных в ячейки стандартный:
Код: vbnet
1.
2.
3.
Dim MasA() As String           'динамический массив
.....
PageWok.Cells(L, 2) = MasA(I)  'Счет/отд/изд


Временно победил эту проблему путем ручного форматирования столбца с указанными строками в "Текстовый". Но хотелось бы решить проблему программно. Офис 2003.
Подскажите пожалуйста, как проще эту проблему решить?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.06.2015, 14:52
    #38973374
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ввод текста в ячейку
вводить предваряющий апостроф
Код: vbnet
1.
'2070/1/1
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.06.2015, 15:31
    #38973416
Казанский
Казанский
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ввод текста в ячейку
Alex37Временно победил эту проблему путем ручного форматирования столбца с указанными строками в "Текстовый". Но хотелось бы решить проблему программно.Почему бы не установить программно формат "Текстовый"?
Код: vbnet
1.
2.
Columns(1).NumberFormat = "@"
Cells(1, 1) = "2070/1/1"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.06.2015, 16:57
    #38973544
Alex37
Alex37
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ввод текста в ячейку
КазанскийAlex37Временно победил эту проблему путем ручного форматирования столбца с указанными строками в "Текстовый". Но хотелось бы решить проблему программно.Почему бы не установить программно формат "Текстовый"?
Код: vbnet
1.
2.
Columns(1).NumberFormat = "@"
Cells(1, 1) = "2070/1/1"


Я примерно такое же решение применил, но у Вас короче:
Код: vbnet
1.
2.
3.
    Columns("B:B").Select
    Range("B2").Activate
    Selection.NumberFormat = "@"


Но думал, что короче можно. Что-то типа прямо в операторе присваивания, используя свойство .Text , но не получилось. А примеров подходящий сразу не нашел:
Код: vbnet
1.
PageWok.Cells(L, 2).Text = MasA(I)  'Счет/отд/изд
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.06.2015, 17:04
    #38973562
Alex37
Alex37
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ввод текста в ячейку
Shocker.Proвводить предваряющий апостроф
Код: vbnet
1.
'2070/1/1


Ого! Про такое не знал. Действительно, работает! Ж8( )

Спасибо всем за советы!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.06.2015, 17:35
    #38973620
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ввод текста в ячейку
Alex37
Код: vbnet
1.
2.
    Columns("B:B").Select
    Range("B2").Activate

http://www.sql.ru/faq/faq_topic.aspx?fid=4344
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.06.2015, 18:02
    #38973656
Alex37
Alex37
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ввод текста в ячейку
Shocker.ProAlex37
Код: vbnet
1.
2.
    Columns("B:B").Select
    Range("B2").Activate

http://www.sql.ru/faq/faq_topic.aspx?fid=4344
Спасибо! Полезная информация.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ввод текста в ячейку / 7 сообщений из 7, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 409ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2173483]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 29ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 44ms
get tp. blocked users:
 2ms
others: 289ms
total:  409ms
x
x
Закрыть


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