Наименование колонок записываемого excel файла

1. Дон Кихот 04.10.21 13:09 Сейчас в теме
Объединяю несколько excel файлов с одинаковыми колонками. Создаю таблицу значений, заполняю колонки следующим способом:
ТабЗнч.Колонки.Добавить("СуммаКонтрактаОбщая",Новый ОписаниеТипов("Строка"));
В оригинале колонка называлась "Сумма контракта общая".

Заполняю ТабЗнч данными нескольких excel файлов. Результат выгружаю следующим методом:
  ПострПечать = Новый ПостроительОтчета;
	ПострПечать.ИсточникДанных = Новый ОписаниеИсточникаДанных(ТабЗнч);
	ТабДокНовый = Новый ТабличныйДокумент;                  
	ПострПечать.Вывести(ТабДокНовый);
	ТабДокНовый.Записать("ИмяФайла.xlsx",ТипФайлаТабличногоДокумента.XLSX);

Как при этом вернуть наименованиям колонок первоначальное наименование?
По теме из базы знаний
Найденные решения
4. dehro 5 04.10.21 13:48 Сейчас в теме
У меня так получилось:

	ТабЗнч = Новый ТаблицаЗначений;
	ТабЗнч.Колонки.Добавить("СуммаКонтрактаОбщая",Новый ОписаниеТипов("Строка"),"Сумма контракта общая"); 
	
	НовСтр = ТабЗнч.Добавить();
	НовСтр.СуммаКонтрактаОбщая = "1000";
	
	НовСтр = ТабЗнч.Добавить();
	НовСтр.СуммаКонтрактаОбщая = "1001";
	
	ПострПечать = Новый ПостроительОтчета;
	ПострПечать.ИсточникДанных = Новый ОписаниеИсточникаДанных(ТабЗнч);
	Для Каждого Запись из ПострПечать.ВыбранныеПоля цикл
		Если Запись.Имя = "СуммаКонтрактаОбщая" тогда
			Запись.Представление = "Сумма контракта общая"
		КонецЕсли;
	КонецЦикла;
	ТабДокНовый = Новый ТабличныйДокумент;
	ПострПечать.Вывести(ТабДокНовый);
	//ИмяВрем = ПолучитьИмяВременногоФайла("xlsx");
	//ТабДокНовый.Записать(ИмяВрем,ТипФайлаТабличногоДокумента.XLSX);
	
	возврат ТабДокНовый

Показать
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. dehro 5 04.10.21 13:19 Сейчас в теме
Попробуй так:
ТабЗнч.Колонки.Добавить("СуммаКонтрактаОбщая", Новый ОписаниеТипов("Строка"), "Сумма контракта общая"); 
3. Дон Кихот 04.10.21 13:28 Сейчас в теме
(2) Наименование колонки в получаемом excel файле остаётся "СуммаКонтрактаОбщая"
4. dehro 5 04.10.21 13:48 Сейчас в теме
У меня так получилось:

	ТабЗнч = Новый ТаблицаЗначений;
	ТабЗнч.Колонки.Добавить("СуммаКонтрактаОбщая",Новый ОписаниеТипов("Строка"),"Сумма контракта общая"); 
	
	НовСтр = ТабЗнч.Добавить();
	НовСтр.СуммаКонтрактаОбщая = "1000";
	
	НовСтр = ТабЗнч.Добавить();
	НовСтр.СуммаКонтрактаОбщая = "1001";
	
	ПострПечать = Новый ПостроительОтчета;
	ПострПечать.ИсточникДанных = Новый ОписаниеИсточникаДанных(ТабЗнч);
	Для Каждого Запись из ПострПечать.ВыбранныеПоля цикл
		Если Запись.Имя = "СуммаКонтрактаОбщая" тогда
			Запись.Представление = "Сумма контракта общая"
		КонецЕсли;
	КонецЦикла;
	ТабДокНовый = Новый ТабличныйДокумент;
	ПострПечать.Вывести(ТабДокНовый);
	//ИмяВрем = ПолучитьИмяВременногоФайла("xlsx");
	//ТабДокНовый.Записать(ИмяВрем,ТипФайлаТабличногоДокумента.XLSX);
	
	возврат ТабДокНовый

Показать
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот