[apsorry]

Доброго времени суток. Столкнулся с ужасной проблемой и рассчитываю на вашу помощь.

1с 7,7 версии. Делаю обработку выгрузки расходной накладной в файл *.xls и возникла следующая проблема. при экспорте строки которая содержит дату в формате ДДММГГГГ, без точек, например 01022013 при открытии файла который получился данной обработкой я наблюдаю что из этой даты пропадает первая цифра "0"

Происходит это потому что Эксель не отображает в числе цифру "0" если он идет в начале числа, решить проблему в самом Экселе можно изменив формат ячейки но как сделать чтобы данная проблема не возникала при экспорте.

Вот часть кода.

    СтрДок = спРН.ПолучитьЗначение(i);
                    тНомерДокумента = СокрЛП(СтрДок.НомерДок) + СимволТабуляции;
                    тТнпп = "№ п/п" + СимволТабуляции;
                    тТнаим = "Название товара и его лекарственная форма" + СимволТабуляции;
                    тТсерия = "Серия" + СимволТабуляции;
                    тТсрокгод = "Срок годности" + СимволТабуляции;
                    тТпроизвод = "Производитель / Страна" + СимволТабуляции;
                    тТрегном = "Регистрационный номер документа качества" + СимволТабуляции;             
                    тТдатавыд = "Дата выдачи" + СимволТабуляции;                    
                    Т.ДобавитьСтроку(тТнпп + тТнаим + тТсерия + тТсрокгод + тТпроизвод + тТрегном + тТдатавыд);
                
                СтрДок.ВыбратьСтроки();
                Пока СтрДок.ПолучитьСтроку() = 1 Цикл
                    //Состояние("Экспорт: "+Цел(СтрДок.НомерСтроки/СтрДок.КоличествоСтрок()*100)+"%");
                    тНомерпп = + СимволТабуляции;
                    тТовар = СокрЛП(СтрДок.ТМЦ.ПолнНаименование) + СимволТабуляции;
                    тСтрана = СокрЛП("Украина") + СимволТабуляции;  
                    
                    
                    тСерия =  СокрЛП(Формат(СтрДок.Выпуск,"Д ДДММГГГГ")); 
                    тСерия =  СокрЛП(СтрЗаменить(тСерия, ".", "")) + СимволТабуляции;     
                    
                    тСрокгодн =СокрЛП(Формат(СтрДок.Выпуск,"Д ДДММГГГГ")); 
                    тСрокгодн =СокрЛП(ДобавитьМесяц(тСрокгодн, 24)) + СимволТабуляции;
                    
                    тРегномердок = СокрЛП(СтрДок.ТМЦ.НомДокКачества) + СимволТабуляции;
                    тДатаВыдКачДок = СокрЛП(формат(СтрДок.ТМЦ.ДатаНомДокКачества,"Д ДДММГГГГ")) + СимволТабуляции;
                    
                    Т.ДобавитьСтроку(тНомерпп + тТовар + тСерия + тСрокгодн + тСтрана + тРегномердок + тДатаВыдКачДок );
                    
                КонецЦикла;

проблемма в экспорте СЕРИИ

тСерия =  СокрЛП(Формат(СтрДок.Выпуск,"Д ДДММГГГГ")); 
тСерия =  СокрЛП(СтрЗаменить(тСерия, ".", "")) + СимволТабуляции;

Если данную вещь экспортировать в txt то проблеммы не возникает но нужный формат xls

[logist]

Экспортируйте дату, в формате понятном экселю. Либо экспортируйте как строку (если что строку можно обозначить в начале символом ' )

[apsorry]

Экспортируйте дату, в формате понятном экселю. Либо экспортируйте как строку (если что строку можно обозначить в начале символом ' )

Вот если бы я знал как экспортировать в формате понятном экселю ((

[logist]

Разделитель даты точка или /

[apsorry]

Разделитель даты точка или /

Решил проблему следующим путем: добавил пробел переддатой

тСерия =  Симв(160) + СокрЛП(Формат(СтрДок.Выпуск,"Д ДДММГГГГ"));