|
|
Задать формат ячейки при записи excel файла
|
|
0
ghOstik
22.05.12
✎
15:58
|
Всем добрый день, сохраняю данные из 1с в excel
код
...
код...
Лист1.Cells(НомерСтроки,НомерКолонки).Value = Значение;
...
код...
Значение записывается в нужную ячейку, все правильно, гду нужно делаю форматы, но у меня просят что бы в excel формат ячейки стоял не "общий", а "Числовой" или "Дата".
Можете подсказать если кто-то делал?
В нете не нашел.
ЗАранее спасибо!
|
|
|
1
ДенисЧ
22.05.12
✎
15:59
|
Включи запись макроса.
Установи руками нужный формат.
Останови запись.
Посмотри на результат.
Наслаждайся
|
|
|
2
ghOstik
22.05.12
✎
16:01
|
(1) мне надо что бы потом блондинка нажимала на кнопку и отправляла полученный файл, блондину по почте.
|
|
|
3
ДенисЧ
22.05.12
✎
16:02
|
(2) так результат повтори в 1с..
|
|
|
4
FN
22.05.12
✎
16:03
|
Ексель.Range(Область).NumberFormat = "@"; //ставим текст
Ексель.Range(Область).NumberFormat = "0"; //число
ЧисловойФормат="0"+?(ТекРеквизит.Точность>0,",","");
для щ=1 по ТекРеквизит.Точность Цикл
ЧисловойФормат=ЧисловойФормат+"0";
КонецЦикла;
Ексель.Range(Область).NumberFormat = ЧисловойФормат; //принудительно ставим числовой формат
|
|
|
5
ghOstik
22.05.12
✎
16:05
|
(3) только сейчас понял о чем ты написал)))
(4) спасибо!
|
|
|
6
FN
22.05.12
✎
16:07
|
(5)+
В твоем случае вместо "Ексель.Range(Область)" пиши "Лист1.Cells(НомерСтроки,НомерКолонки)"
|
|
|
7
ghOstik
22.05.12
✎
16:12
|
(6) ну да это понятно)
|
|
|
8
ghOstik
22.05.12
✎
17:38
|
Cовсем забыл написать для даты
ДатаФормат = "ДД.ММ.ГГГГ";
Лист2.Cells(НомерСтроки,НомерКолонки).NumberFormat = ДатаФормат; //принудительно ставим формат даты
Мало ли кому-то понадобится)
|
|
