Объединение ячеек в макетах 1С:Предприятие — типичная задача при формировании отчетов, печатных форм или пользовательских интерфейсов. Вручную это делается за считанные клики, но когда требуется автоматизировать процесс (например, для динамических макетов или массовой обработки), приходится писать код. Проблема в том, что документация 1С расплывчато описывает нюансы работы с ТабличныйДокумент, а готовые примеры часто не учитывают особенности разных версий платформы.

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

Если вы ранее сталкивались с тем, что после объединения ячеек исчезают границы или нарушается выравнивание текста, здесь найдете решения этих проблем. А для тех, кто только начинает работать с макетами, мы подготовили чек-лист подготовки кода и FAQ по частым ошибкам.

1. Базовый метод: Объединение ячеек через Объединить()

Самый простой способ слить ячейки — использовать встроенный метод Объединить() объекта ОбластьЯчеек. Он работает и для управляемых форм, и для обычных табличных документов. Синтаксис:

ТабличныйДокумент.Область(НомерСтроки1, НомерКолонки1, НомерСтроки2, НомерКолонки2).Объединить();

Где параметры задают координаты верхней левой (НомерСтроки1, НомерКолонки1) и нижней правой (НомерСтроки2, НомерКолонки2) ячеек объединяемой области. Важно: нумерация начинается с 1, а не с 0!

  • 🔹 Плюсы метода: минимальный код, поддерживается во всех версиях 1С 8.x.
  • 🔸 Минусы: не позволяет задавать параметры форматирования (например, направление текста в объединенной ячейке).
  • 🔶 Типичная ошибка: попытка объединить ячейки с уже существующими объединениями приводит к исключению.

Пример кода для объединения ячеек в первой строке таблицы (колонки 1–3):

ТабДок = Новый ТабличныйДокумент;

// Заполняем таблицу данными (пример)


ТабДок.ВывестиСтроку("Заголовок 1|Заголовок 2|Заголовок 3");


// Объединяем первые 3 колонки в первой строке


ТабДок.Область(1, 1, 1, 3).Объединить();


// Задаем текст для объединенной ячейки


ТабДок.Область(1, 1).Текст = "Объединенный заголовок";

💡

Перед объединением проверьте, не пересекается ли выбранная область с уже объединенными ячейками. Для этого используйте свойство ОбластьЯчеек.Объединена.

2. Объединение с учетом условий (динамические макеты)

Часто требуется объединять ячейки не статично, а на основе данных. Например, в отчете по продажам сливать ячейки с одинаковыми наименованиями товаров. Для этого используем цикл по строкам и проверку условий.

Алгоритм:

  1. Получаем данные для вывода (например, результат запроса).
  2. В цикле заполняем табличный документ.
  3. Сравниваем значения в соседних строках — если они совпадают, объединяем ячейки.

Пример кода для объединения ячеек с одинаковыми значениями в первом столбце:

Запрос = Новый Запрос;

Запрос.Текст =


"ВЫБРАТЬ


|   Товары.Наименование КАК Товар,


|   СУММА(Документ.Количество) КАК Количество


|ИЗ


|   Документ.РеализацияТоваровУслуг КАК Документ


|       ЛЕВОЕ СОЕДИНЕНИЕ Справочник.Товары КАК Товары


|       ПО Документ.Товар = Товары.Ссылка


|СГРУППИРОВАТЬ ПО


|   Товары.Наименование";


Результат = Запрос.Выполнить();



ТабДок = Новый ТабличныйДокумент;


ТекущаяСтрока = 1;



// Выводим заголовки


ТабДок.ВывестиСтроку("Товар|Количество");



// Обрабатываем результат запроса


Выборка = Результат.Выбрать();


Пока Выборка.Следующий() Цикл


ТекущаяСтрока = ТекущаяСтрока + 1;


ТабДок.ВывестиСтроку(Выборка.Товар + "|" + Выборка.Количество);



// Проверяем, совпадает ли товар с предыдущей строкой


Если ТекущаяСтрока > 2 И Выборка.Товар = ПредыдущийТовар Тогда


// Объединяем ячейки в первом столбце


ТабДок.Область(ТекущаяСтрока - 1, 1, ТекущаяСтрока, 1).Объединить();


КонецЕсли;



ПредыдущийТовар = Выборка.Товар;


КонецЦикла;

💡

При динамическом объединении всегда сохраняйте ссылку на предыдущее значение (в примере — переменная ПредыдущийТовар). Это позволит избежать ошибок при сравнении данных.

3. Работа с объединенными ячейками в управляемых формах

В управляемых формах 1С табличные документы часто используются для вывода данных в элементах ПолеТабличногоДокумента. Здесь есть нюансы:

  • 📌 Объединение ячеек не сохраняется при программном изменении данных в таблице — его нужно выполнять заново.
  • 📍 Для динамического обновления используйте событие ПриИзменении или ПриАктивизацииСтроки.
  • 🔧 Метод Обновить() сбрасывает все объединения — вызывайте его до применения логики слияния ячеек.

Пример кода для управляемой формы:

&НаКлиенте

Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)


// Получаем табличный документ из элемента формы


ТабДок = Элементы.ПолеТабличногоДокумента.Значение;



// Заполняем данными (пример)


ТабДок.Очистить();


ТабДок.ВывестиСтроку("Показатель|Значение");


ТабДок.ВывестиСтроку("Выручка|1 000 000");


ТабДок.ВывестиСтроку("Себестоимость|700 000");


ТабДок.ВывестиСтроку("Прибыль|300 000");



// Объединяем ячейки в первом столбце для строк с цифрами


ТабДок.Область(2, 1, 4, 1).Объединить(Истина, "Прибыль организации");


КонецПроцедуры

📊 Какой тип макетов вы чаще используете в 1С?
Статичные (фиксированная структура)
Динамические (зависят от данных)
Управляемые формы
Отчеты с группировками

Обратите внимание на параметры метода Объединить() в управляемых формах:

Параметр Описание Пример значения
Горизонтальное Объединять по горизонтали (если Истина) Истина
Вертикальное Объединять по вертикали Ложь
Текст Текст для объединенной ячейки (опционально) "Итог"
Перенос Разрешить перенос текста Истина

4. Продвинутые техники: объединение с форматированием

Базовый метод Объединить() не позволяет задавать параметры оформления объединенной ячейки. Для этого используем комбинацию методов:

  1. Объединить() — сливаем ячейки.
  2. УстановитьФормат() или ПараметрыСтраницы — настраиваем внешний вид.
  3. Текст — задаем содержимое.

Пример кода с настройкой шрифта и выравнивания:

ТабДок = Новый ТабличныйДокумент;

// Заполняем таблицу


ТабДок.ВывестиСтроку("Параметр|Значение 1|Значение 2");



// Объединяем ячейки в первой строке


Область = ТабДок.Область(1, 1, 1, 3);


Область.Объединить();



// Настраиваем форматирование


Область.Шрифт = Новый Шрифт("Arial", 12, Истина, Ложь, Истина); // Жирный, 12pt


Область.ГоризонтальноеПоложение = ГоризонтальноеПоложениеТекста.ПоЦентру;


Область.ВертикальноеПоложение = ВертикальноеПоложениеТекста.ПоЦентру;


Область.ЦветФона = RGB(200, 230, 255); // Светло-голубой фон



// Задаем текст


Область.Текст = "Основные показатели";

Как сохранить границы при объединении?

По умолчанию метод Объединить() убирает внутренние границы. Чтобы их вернуть, после объединения явно задайте параметры границ через Область.Граница(ТипГраницыТабличногоДокумента.ВнутренняяГоризонтальная).Видимость = Истина;

Для сложных макетов (например, с вложенными областями) используйте иерархическое объединение:

  1. Сначала объедините внешние ячейки.
  2. Затем — вложенные области внутри них.

Это предотвратит "разъезд" структуры при изменении данных.

5. Ошибки и их решение

Даже опытные разработчики сталкиваются с проблемами при объединении ячеек. Рассмотрим типичные сценарии и способы их исправления.

Ошибка Причина Решение
"Область не может быть объединена" Ячейки уже объединены или пересекаются с другой объединенной областью Перед объединением проверьте Область.Объединена и при необходимости разъедините (Область.Разъединить())
Исчезли границы Метод Объединить() сбрасывает стили границ Явно задайте границы после объединения (см. спойлер выше)
"Индекс вне границ" Указаны несуществующие строки/колонки Проверьте размеры таблицы через ТабДок.ВысотаТаблицы и ТабДок.ШиринаТаблицы
Текст не помещается Автоподбор ширины не работает для объединенных ячеек Задайте фиксированную ширину колонки или включите перенос (Область.Перенос = Истина)

Убедиться, что индексы строк/колонок не выходят за границы таблицы|Проверить, не пересекается ли область с уже объединенными ячейками|Сохранить текущие параметры форматирования (если нужно восстановить)|Очистить содержимое ячеек, если оно не требуется в объединенной области-->

Особый случай — объединение ячеек в печатных формах. Здесь часто возникает проблема с "прыгающими" границами при экспорте в PDF или Excel. Решение:

  • 🖼️ Используйте ТабДок.ТолькоПросмотр = Истина перед экспортом.
  • 📄 Для Excel настройте параметры через ПараметрыЭкспортаВExcel.
  • 🔍 Проверьте масштаб страницы — иногда объединенные ячейки "разъезжаются" из-за неправильных полей.

6. Оптимизация для больших таблиц

При работе с таблицами более 1000 строк объединение ячеек в цикле может значительно тормозить производительность. Оптимизируем код:

  • 🚀 Отключите визуализацию на время объединения: 
    ТабДок.ТолькоПросмотр = Истина;

    // ... код объединения ...
    

    ТабДок.ТолькоПросмотр = Ложь;

  • 🔄 Минимизируйте обращения к свойствам: сохраняйте часто используемые значения (например, Область) в переменные.
  • 📊 Используйте массовые операции: вместо поэлементного объединения стройте логику на основе группировок данных.

Пример оптимизированного кода для большого отчета:

// 1. Получаем данные и группируем их заранее (на сервере)

ГруппыТоваров = Новый Соответствие;


Выборка = РезультатЗапроса.Выбрать();


Пока Выборка.Следующий() Цикл


Если НЕ ГруппыТоваров.Содержит(Выборка.Товар) Тогда


ГруппыТоваров.Вставить(Выборка.Товар, Новый Массив);


КонецЕсли;


ГруппыТоваров[Выборка.Товар].Добавить(Выборка.Количество);


КонецЦикла;



// 2. Заполняем таблицу с объединением (на клиенте)


ТабДок = Новый ТабличныйДокумент;


ТекущаяСтрока = 1;



Для Каждого Товар Из ГруппыТоваров Цикл


ТекущаяСтрока = ТекущаяСтрока + 1;


ТабДок.ВывестиСтроку(Товар.Ключ + "|" + СтрСоединить(Товар.Значение, ","));



// Объединяем только если есть несколько значений


Если Товар.Значение.Количество() > 1 Тогда


ТабДок.Область(ТекущаяСтрока, 1, ТекущаяСтрока + Товар.Значение.Количество() - 1, 1).Объединить();


КонецЕсли;


КонецЦикла;

💡

Для таблиц более 5000 строк рассмотрите возможность генерации макета на сервере с последующей передачей клиенту. Это снизит нагрузку на интерфейс.

FAQ: Частые вопросы по объединению ячеек в 1С

🔍 Как объединить ячейки по диагонали?

В стандартном функционале 1С нет метода для диагонального объединения. Альтернативные решения:

  1. Использовать графические примитивы: нарисовать линию поверх ячеек через ТабДок.РисоватьЛинию().
  2. Экспортировать таблицу в Excel и там настроить диагональные границы (если требуется печатная форма).

Пример кода для рисования диагонали:

ТабДок.РисоватьЛинию(10, 10, 100, 100, RGB(0, 0, 0), 1); // Координаты в мм
⚠️ Почему после объединения исчезает текст?

Это происходит потому, что метод Объединить() по умолчанию сохраняет текст только из верхней левой ячейки области. Решения:

  • Явно задайте текст после объединения: Область.Текст = "Нужный текст".
  • Используйте параметр Текст в методе Объединить() (см. раздел 3).
📑 Как экспортировать объединенные ячейки в Excel без потерь?

Проблемы при экспорте возникают из-за различий в форматах 1С и Excel. Чек-лист для корректного экспорта:

  1. Перед экспортом вызовите ТабДок.ТолькоПросмотр = Истина.
  2. Используйте параметры: 
    Параметры = Новый ПараметрыЭкспортаВExcel;

    Параметры.ЭкспортироватьОбъединенныеЯчейки = Истина;

  3. Для сложных макетов экспортируйте в PDF, а затем конвертируйте в Excel через сторонние инструменты.
🔄 Можно ли отменить объединение ячеек программно?

Да, для этого используется метод Разъединить():

ТабДок.Область(1, 1, 3, 3).Разъединить();

Важно: метод разъединяет всю область, даже если внутри были вложенные объединения. Чтобы разъединить только верхний уровень, используйте цикл по ячейкам с проверкой Область.Объединена.

🎨 Как задать разные цвета для объединенных ячеек?

Цвет фона и текста настраивается через свойства ЦветФона и ЦветТекста после объединения:

Область = ТабДок.Область(1, 1, 1, 3);

Область.Объединить();


Область.ЦветФона = RGB(220, 230, 241); // Светло-голубой


Область.ЦветТекста = RGB(0, 0, 139);   // Темно-синий

Для градиента или сложного оформления используйте ТабДок.РисоватьЗаливку().

💡

Если вам нужно объединить ячейки в отчете на СКД, рассмотрите возможность использования вложенных группировок вместо программного объединения. Это упростит поддержку кода.

Если ваш сценарий не покрыт в статье — опишите его в комментариях. Мы регулярно дополняем материал актуальными примерами (например, в следующем обновлении добавим раздел про объединение ячеек в 1С:ERP с учетом специфики этого решения).

Для углубленного изучения темы рекомендуем официальную документацию по работе с ТабличныйДокумент в 1С:Предприятие 8.3 (раздел "Программное управление макетами"). Обратите внимание, что в версиях ниже 8.3.10 некоторые методы (например, Объединить() с параметрами форматирования) могут работать иначе — тестируйте код на целевой платформе.