Выгрузка в ексель из 1с

1С v8

15.08.13

✎

17:44

Всем доброго времени суток, такой вопросик еще есть, какие еще есть способы сохранения в Excel, кроме шаблона, построчно, или сразу таблицу. Есть такая проблема при сохранении сразу таблицу в ексели, ексель убирает у Артиклов нули переднии, хотя они должны быть, нашел выход поставил апостроф впереди и тогда все норм. Если построчно или шаблоном Excel, то очень долго сохраняет прайс лист порядка 15-20 минут, а их около 30 выходит по времени накладно. Может кто знает еще какие нить варианты которые при сохранении не будут удалять нули и без добавлния апострафов подскажите, буду очень признателен

1 МихаилМ

15.08.13

✎

17:48

http://yandex.ru/yandsearch?text=%E2%FB%E3%F0%F3%E7%EA%E0+Excel+%EB%E8%E4%E8%F0%F3%FE%F9%E8%E5+%ED%F3%EB%E8&site=forum.mista.ru&lr=213

2 genosse

15.08.13

✎

17:54

Когда долго очень часто связано с тем, что включен режим разметки страницы при заполнении данными, нужно его отключить.

3 Tumakota

15.08.13

✎

17:55

(2) Не понял можно по подробнее где его отключить?

4 Tumakota

15.08.13

✎

18:00

(2) А не льзая как нить сразу таблицу сохранить чтобы он не убирал лидирующее нули?

5 Pashkaa

15.08.13

✎

19:06

А чем не устраивает вывод в Табличный документ и сохранение его в Excel?

6 Tumakota

16.08.13

✎

09:05

(5) такая выгрузка убирает лидирующии нули, если не ставить апостроф

7 wms

16.08.13

✎

09:10

(0)в 1С выводит в ячейку данные в нужном формате
формат() тебе поможет

8 Tumakota

16.08.13

✎

09:35

(7) При сохранении потом в Ексель всей таблицы, Эксель серовно убирает лидирующие нули

9 wms

16.08.13

✎

10:00

(8)
http://forum.infostart.ru/forum26/topic58277/
v8: Выгрузка справочника в Эксель

10 Tumakota

16.08.13

✎

10:11

ДиалогВыбораФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение);

    ДиалогВыбораФайла.Фильтр                      = "Текстовый файл (*.xls)|*.xls";
    ДиалогВыбораФайла.Заголовок                   = "Выберите файл для сохранения прайс листа";
    ДиалогВыбораФайла.ПредварительныйПросмотр     = Ложь;
    ДиалогВыбораФайла.Расширение                  = "xls";

    ДиалогВыбораФайла.ИндексФильтра               = 0;
    ПутьКФайлу = ВосстановитьЗначение("ПутьКФайлуПрайсЛиста31574843745741");
    Если ПутьКФайлу = Неопределено Тогда
        ПутьКФайлу = "";
    КОнецЕсли;
    ДиалогВыбораФайла.ПолноеИмяФайла              = ПутьКФайлу;
    //ДиалогВыбораФайла.ПроверятьСуществованиеФайла = Истина;

    Если ДиалогВыбораФайла.Выбрать() Тогда
        ПутьКФайлу = ДиалогВыбораФайла.ПолноеИмяФайла;
        СохранитьЗначение("ПутьКФайлуПрайсЛиста31574843745741",ПутьКФайлу);

        ЭлементыФормы.МакетПрайсЛист.Записать(ПутьКФайлу,ТипФайлаТабличногоДокумента.XLSX);
    КонецЕсли;

Вот как я сохраняю сформированный отчет по прайсу

11 Tumakota

16.08.13

✎

10:12

Куда здесь вставить Selection.NumberFormat = "@", не понимаю

12 wms

16.08.13

✎

12:40

(11)надо открыть этот эксель файл после
ЭлементыФормы.МакетПрайсЛист.Записать(ПутьКФайлу,ТипФайлаТабличногоДокумента.XLSX);
и его обработать

вот пример из моего шаблона

Эксель = ПолучитьCOMОбъект(ПутьКФайлу);
НомерЛиста=1;НомерСтроки=2;НомерКолонки=1;НаимЯчейки = "начало";

Пока СокрЛП(НаимЯчейки) <> "" Цикл // можно использовать другой признак окончания данных на листе
НаимЯчейки =сокрлп(Эксель.Sheets(НомерЛиста).Cells(НомерСтроки,НомерКолонки).Value);
НомерСтроки=НомерСтроки+1;
конеццикла;

вот еще ссылка
http://1c.proclub.ru/modules/newbb/viewtopic.php?topic_id=276754&forum=2