Вход | Регистрация
 
1С:Предприятие :: 1С:Предприятие 8 общая

Word добавление картинки ConvertToShape()

Word добавление картинки ConvertToShape()
Я
   alod
 
01.04.19 - 16:51
Всем привет.
Делаю печатную форму в ворде. Столкнулся в в этот раз с проблемой добавления картинок в колонтитулы, т.е. картинка то добавляется, а вот метод ConvertToShape() постоянно выдает ошибку.
Word = Новый COMОбъект("Word.Application");
WordDoc = Word.documents.add(ПутьКШаблону);
WordSections= WordDoc.sections(1).footers(2).Range;
//ищем место для вставки
WordSections.Find.ClearFormatting();
WordSections.Find.Text = "#МестоДляКартинки#";
WordSections.Find.Forward = 1;
WordSections.Find.Wrap = 1;
//вставляем
Картинка = WordSections.InlineShapes.AddPicture(ПутьККартинке,ложь,Истина);
картинка вставляется, но ее нужно разместить за текстом и при попытке конвертировать вываливается ошибка
"Ошибка при вызове метода контекста (ConvertToShape): Произошла исключительная ситуация (0x80004005)"

так
Шейп = Картинка.ConvertToShape();
или так
Шейп = WordSections.InlineShapes(1).ConvertToShape();
вываливает ошибку

Читал про подобную проблему  тут https://helpf.pro/help/view/13855.html
WordSections.InlineShapes(1).Select() не помогло
 
 

Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Рекламное место пустует