0
a1phoenix
01.02.13
✎
12:54
|
Добрый день!
Необходима Ваше содействие:
Процедура Кнопка1Нажатие(Элемент)
СсылкаМакет = Документы.Договор.ПолучитьМакет("ШАБЛОН");
MSWord = СсылкаМакет.Получить();
Попытка
СсылкаМакет = MSWord.Application.Documents(1);
СсылкаМакет.Activate();
MSWord.Bookmarks(СокрЛП("ТаблицаПереченьПриложение5")).Select();
СсылкаМакет.Paragraphs.Add();
Rng = MSWord.Application.Selection.Range;
Rng.InsertAfter(Число("№ п/п"*"Наименование"*"Количество")); //ошибка "Преобразование значения к типу Число не может быть выполнено"
Rng.InsertParagraphAfter();
СтрочкаТаблицы = ЭлементыФормы.ПереченьОборудования.ТекущиеДанные;
Для Каждого СтрочкаТаблицы из ПереченьОборудования Цикл
Rng.InsertAfter(Строка(СтрочкаТаблицы.НомерСтроки +"*"+ СтрочкаТаблицы.Наименование +"*"+ СтрочкаТаблицы.Количество));
Rng.InsertParagraphAfter();
КонецЦикла;
Rng.ConvertToTable("*");
СсылкаМакет.Tables(1).AutoFormat(17);
СсылкаМакет.Application.Visible = Истина;
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
КонецПроцедуры
Дело в том что при выполнении даной процедуры выходит ошибка Rng.InsertAfter(Число("№ п/п"*"Наименование"*"Количество")); //ошибка "Преобразование значения к типу Число не может быть выполнено"
В результате в вордовский фаил должна выгружатся таблица в указанное закладкой место.
|
|