Вывод таблицы значений на печать в 1С: 5 рабочих способов с примерами

Работа с таблицами значений в 1С:Предприятие 8.3 — одна из самых востребованных задач при разработке отчётов, обработок и печатных форм. Однако стандартные механизмы платформы не всегда позволяют гибко настроить вывод данных на печать: то колонки съезжают, то шрифты не соответствуют требованиям, то данные обрезаются. Эта статья поможет разобраться, как правильно экспортировать таблицу значений в печатную форму, избегая типичных ошибок.

Мы рассмотрим не только базовые методы через ТабличныйДокумент, но и альтернативные подходы: вывод в Excel, использование макетов SNF, генерацию PDF через внешние компоненты, а также программное формирование отчётов с группировками. Особое внимание уделим нюансам, которые часто упускают: настройке полей страницы, обработке больших объёмов данных и адаптации печати под разные устройства (принтеры, PDF-просмотрщики).

Если вы не программист, но нужно срочно распечатать таблицу из 1С — в статье есть готовые обработки и пошаговые инструкции без кода. Для разработчиков приведены примеры на встроенном языке с комментариями, включая работу с Запросом, ДвоичнымиДанными и COM-объектами.

1. Базовый способ: вывод через ТабличныйДокумент

Самый простой и универсальный метод — использование объекта ТабличныйДокумент. Он подходит для печати как небольших таблиц (10-20 строк), так и средних объёмов данных (до 1000 строк). Главное преимущество — минимальные требования к коду и совместимость со всеми конфигурациями 1С 8.3.

Алгоритм действий:

• 📌 Создайте новый ТабличныйДокумент через конструктор или программно.
• 🔄 Перенесите данные из таблицы значений в табличный документ методом ВывестиТаблицу().
• 🖨️ Настройте параметры страницы (ориентация, поля, колонтитулы).
• 📄 Вызовите печать через Печать() или экспортируйте в PDF/Excel.

Пример кода для быстрого вывода:

ТабДок = Новый ТабличныйДокумент;
ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Альбомная;
ТабДок.ВывестиТаблицу(ВашаТаблицаЗначений);
ТабДок.Показать(); // Просмотр перед печатью
ТабДок.Печать();   // Непосредственная печать

⚠️ Внимание: При выводе таблиц с более чем 500 строками ТабличныйДокумент может тормозить. В этом случае разбейте данные на части или используйте альтернативные методы (см. раздел 3).

2. Печать с использованием макетов SNF

Для сложных отчётов с фиксированной структурой (например, бухгалтерские ведомости или складские накладные) удобнее использовать макеты SNF. Они позволяют:

• 🎨 Точно позиционировать колонки и заголовки.
• 🔍 Настраивать условное оформление (цвет ячеек по условию).
• 📏 Автоматически подгонять ширину колонок под содержимое.
• 🔄 Добавлять группировки и итоги.

Как создать макет:

1. В конфигураторе откройте объект (отчёт/обработка) и добавьте новый макет типа ТабличныйДокумент.
2. В редакторе макета нарисуйте шапку таблицы, подвал и область данных.
3. Привяжите области макета к данным через свойства ИсточникДанных и Параметры.
4. В модуле объекта вызовите вывод:

   Макет = Отчеты.ВашОтчет.ПолучитьМакет("ОсновнойМакет");
   ТабДок = Новый ТабличныйДокумент;
   ТабДок.Вывести(Макет, ВашаТаблицаЗначений);
   ТабДок.Печать();

Преимущество макетов — они сохраняют форматирование при изменении данных, в отличие от динамического вывода через ВывестиТаблицу(). Например, если вы настроили жирный шрифт для итоговых строк, он останется даже после обновления источника данных.

⚠️ Внимание: При редактировании макетов в конфигураторе 1С 8.3.20+ может сбиваться привязка областей. Всегда проверяйте результат в режиме предприятия!

3. Экспорт в Excel: когда нужна гибкость

Если требуется не просто распечатать таблицу, а передать её в Excel для дальнейшей обработки (например, построения графиков или сводных таблиц), используйте методы экспорта через COM-объект или ЗаписьXML.

Способ 1: Через COM-объект (только для Windows):

Excel = Новый COMОбъект("Excel.Application");
Книга = Excel.Workbooks.Add();
Лист = Книга.Worksheets(1);

// Заполнение заголовков
Для Каждого Колонка Из ВашаТаблицаЗначений.Колонки Цикл
Лист.Cells(1, Колонка.Индекс + 1).Value = Колонка.Заголовок;
КонецЦикла;

// Заполнение данных
Для i = 0 По ВашаТаблицаЗначений.Количество() - 1 Цикл
Для Каждого Колонка Из ВашаТаблицаЗначений.Колонки Цикл
Лист.Cells(i + 2, Колонка.Индекс + 1).Value = ВашаТаблицаЗначений[i][Колонка.Имя];
КонецЦикла;
КонецЦикла;

Excel.Visible = Истина; // Показать Excel

Способ 2: Через ЗаписьXML (кроссплатформенно):

ЗаписьXML = Новый ЗаписьXML;
ЗаписьXML.УстановитьСтроку();
ЗаписьXML.ЗаписатьОбъявлениеXML();
ЗаписьXML.ЗаписатьНачалоЭлемента("Таблица");

// Запись данных (упрощённо)
Для Каждого Строка Из ВашаТаблицаЗначений Цикл
ЗаписьXML.ЗаписатьНачалоЭлемента("Строка");
Для Каждого Колонка Из ВашаТаблицаЗначений.Колонки Цикл
ЗаписьXML.ЗаписатьТекст(Строка[Колонка.Имя]);
КонецЦикла;
ЗаписьXML.ЗаписатьКонецЭлемента(); // Строка
КонецЦикла;

ЗаписьXML.ЗаписатьКонецЭлемента(); // Таблица
Результат = ЗаписьXML.Закрыть();

// Сохранение в файл
ДвоичныеДанные = Новый ДвоичныеДанные(Результат);
ДвоичныеДанные.Записать("C:\temp\таблица.xml");

4. Печать больших таблиц: оптимизация производительности

При выводе таблиц с более чем 1000 строк стандартные методы могут приводить к зависаниям или ошибкам памяти. В этом случае поможет:

• 🔄 Постраничный вывод: разбивайте данные на части по 500-1000 строк и печатайте каждую часть отдельно.
• 📊 Агрегация данных: если возможна, сводите детализированные данные в итоги (например, вместо печати всех строк накладной выводите только суммы по номенклатуре).
• 🖥️ Фоновое выполнение: используйте ПоместитьВФоновоеЗадание() для длительных операций.
• 🗃️ Кэширование: сохраняйте промежуточные результаты в временные таблицы базы данных.

Пример постраничного вывода:

КоличествоСтраниц = ВашаТаблицаЗначений.Количество() / 500 + 1;
Для НомСтр = 1 По КоличествоСтраниц Цикл
Начало = (НомСтр - 1) * 500;
Конец = Мин(Начало + 499, ВашаТаблицаЗначений.Количество() - 1);
ЧастьТаблицы = ВашаТаблицаЗначений.ПолучитьСтроки(Начало, Конец);

ТабДок = Новый ТабличныйДокумент;
ТабДок.ВывестиТаблицу(ЧастьТаблицы);
ТабДок.Печать();
КонецЦикла;

⚠️ Внимание: При печати более 10 000 строк даже постраничный вывод может тормозить. В этом случае рассмотрите вариант генерации PDF через внешние библиотеки (см. раздел 5) или экспорта в CSV с последующей печатью из другой программы.

Проверьте актуальность данных (удалите ненужные строки)|Разбейте вывод на части по 500-1000 строк|Отключите ненужное форматирование (цвета, границы)|Используйте фоновые задания для длительных операций|Сохраните отчёт в файл вместо прямой печати-->

5. Продвинутые методы: генерация PDF и использование внешних компонент

Для профессиональной печати (например, счетов-фактур с логотипом компании или многостраничных каталогов) стандартных средств 1С недостаточно. В этом случае поможет:

Способ 1: Библиотека OneScript.PDF

PDF = Новый PDFДокумент;
Страница = PDF.ДобавитьСтраницу();

// Добавляем заголовок
Страница.НарисоватьТекст(100, 100, "Отчёт по продажам", 16, PDFШрифт.ДежаВюСансБолд);

// Добавляем таблицу
Таблица = Страница.ДобавитьТаблицу(50, 150, 500, 200, ВашаТаблицаЗначений);

// Сохраняем результат
PDF.Сохранить("C:\temp\отчет.pdf");

Отчет = Новый COMОбъект("FastReport.Report");
Отчет.Load("C:\reports\шаблон.fr3");
Отчет.SetParameter("ДатаНачала", НачалоПериода);
Отчет.SetParameter("ДатаКонца", КонецПериода);
Отчет.Prepare();

Отчет.Export("C:\temp\отчет.pdf", "PDF");

Группировка = ВашаТаблицаЗначений.Сгруппировать("КолонкаДляГруппировки");
Для Каждого Группа Из Группировка Цикл
ТабДок.ВывестиСтроку("Группа: " + Группа.Ключ);
ТабДок.ВывестиТаблицу(Группа.Выгрузить());
КонецЦикла;

ПараметрыПечати = Новый Структура;
ПараметрыПечати.Вставить("Дуплекс", Истина);
ТабДок.Печать(,, ПараметрыПечати);

ТабДок.ШиринаСтраницы = 60; // мм
ТабДок.ВысотаСтраницы = 200; // мм
ТабДок.Поля.Левое = 2;
ТабДок.ВывестиТаблицу(ВашаТаблицаЗначений);
ТабДок.Печать();