1C+Excel

[markgenuine]

Всем привет, может кто сталкивался с выводом в excel файл?
В цикле вывожу данные так, вывожу в шаблон xls файл поэтому нужно чтобы при выводе этих данных строчки сдвигались:

Код Выделить Развернуть

Пока ВыборкаДетальныеЗаписи.Следующий() Цикл

РабочийЛист.Cells(СтрокаШапки,КолонкаНомера).Value=НомерСтроки;
РабочийЛист.Cells(СтрокаШапки,КолонкаФамилии).Value=Фамилия;
РабочийЛист.Cells(СтрокаШапки,КолонкаФамилии).Value=Имя;
РабочийЛист.Cells(СтрокаШапки,КолонкаФамилии).Value=Отчество;
НомерСтроки=НомерСтроки+1;

КонецЦикла;

Так же еще проблема вот например я вывожу подряд строчки и если строки в xls файле объединенные, то как очистить их при выводе?

СПАСИБО!

[Klyacksa]

Какие строчки куда сдвигались? Вы в одну и ту же строку (СтрокаШапки) выводите данные на каждой итерации, а надо каждый раз брать следующую строку. Фамилия, Имя, Отчество должно быть в разных колонках или соединиться в одну?
Как вариант:

Код Выделить Развернуть


Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
    РабочийЛист.Cells(СтрокаШапки+НомерСтроки,КолонкаНомера).Value=НомерСтроки;

    // дальше так
    РабочийЛист.Cells(СтрокаШапки+НомерСтроки,КолонкаФамилии).Value=Фамилия;
    РабочийЛист.Cells(СтрокаШапки+НомерСтроки,КолонкаИмени).Value=Имя;
    РабочийЛист.Cells(СтрокаШапки+НомерСтроки,КолонкаОтчества).Value=Отчество;
    // или так
    РабочийЛист.Cells(СтрокаШапки+НомерСтроки,КолонкаФамилии).Value=Фамилия+" "+Имя+" "+Отчество;

    НомерСтроки=НомерСтроки+1;
КонецЦикла;

[markgenuine]

Они должны быть в разных колонках....
я сделал, так:

Код Выделить Развернуть

Пока ВыборкаДетальныеЗаписи.Следующий() Цикл

Лист.Rows(СтрокаШапки+Номер).Insert();
Лист.Cells(СтрокаШапки+Номер,КолонкаНомера).Value=Номер+1;

Лист.Cells(СтрокаШапки+Номер,КолонкаФамилии).Value=ФФамилия;
Лист.Cells(СтрокаШапки+Номер,КолонкаИмени).Value=ФИмя;
Лист.Cells(СтрокаШапки+Номер,КолонкаОтчества).Value=ФОтчество;
Лист.Cells(СтрокаШапки+Номер,КолонкаНомераСчета).Value=ВыборкаДетальныеЗаписи.НомерЛицевогоСчета;
Лист.Cells(СтрокаШапки+Номер,КолонкаСуммы).Value=ВыборкаДетальныеЗаписи.Сумма+ВыборкаДетальныеЗаписи.КомпенсацияЗаЗадержкуЗарплаты;

Номер=Номер+1;

КонецЦикла;
Лист.Rows(СтрокаШапки+Номер).Insert();

Но теперь проблема!!! Первая строка, т.е. СтрокаШапки остается пустой, как ее потом после вывода удалить?)))

И еще вопрос как потом это еще обвести как таблицу?)

[Dethmontt]

Открываем ЭКСЕЛЬ(Любую книгу) жмем Alt+F11 - Там есть помощник (жмем F1) Ищем и Внимательно читаем!!!

Добавлено: 22 янв 2013, 12:04

Читаешь либо про Cells либо про Range

[markgenuine]

удалил, оказывается легко, осталось разобраться с рамкой, тобишь с Border=)