Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
14 дек 2024, 10:40

Ячейка табличного документа

Автор Tata86, 24 фев 2011, 06:21

0 Пользователей и 1 гость просматривают эту тему.

Tata86

Как программно можно разбить ячейку и задать тип - по вертикали? Допустим 1 область - R22C9, 2 область - R22C10. Я объединяю область R22C9:R22C10.  Затем объединенную область мне необходимо разбить по вертикали Получим область R22C9:R22C10 и R23C9:R23C10. И нижнюю область полученную в результате разбивки по вертикали еще раз разбить по горизонтали. В конечном итоге получить три области и в каждую задать определенный текст. 1 область - R22C9:R22C10, 2 область - R23C9, 3 область - R23C10. Изначально одна ячейка.

cska-fanat-kz

Процедура КнопкаСформироватьНажатие(Кнопка)
   
   ТабДок = ЭлементыФормы.ОтчетРезультат;
   
   Область = ТабДок.Область("R22C9:R22C10");
   Область.Объединить();
   
   Линия = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная);
   Область.Обвести(Линия, Линия, Линия, Линия);
   ТабДок.ВставитьОбласть(Область, , ТипСмещенияТабличногоДокумента.ПоВертикали);
   
   Область0 = ТабДок.Область("R23C9:R23C10");
   Область0.Разъединить();
   
   Область2 = ТабДок.Область("R23C9");
   Область2.Обвести(Линия, Линия, Линия, Линия);
   Область3 = ТабДок.Область("R23C10");
   Область3.Обвести(Линия, Линия, Линия, Линия);
   
   Область.Текст = "Область";
   Область2.Текст = "Область2";
   Область3.Текст = "Область3";
   
КонецПроцедуры

Могу скинуть пример отчета. откуда это взято...
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Tata86


cska-fanat-kz

Для спасибо есть кнопочка "Сказать СПАСИБО" ;)
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Tata86

Буду признательна за отчет.

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск