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

Дублируются картинки при выводе в Excel

Дублируются картинки при выводе в Excel
Я
   volchara
 
16.09.20 - 22:02
Здравствуйте.
После изменения режима совместимости с 8.2.16 на 8.3.7 картинки начали выводится в 2-х экземплярах одна поверх другой, с именами типа Рисунок 15 и Picture 15)) Как побороть. Фрагмент кода

                       Для Строка = 0 По мКартинки.Количество()-1 Цикл
                Если мКартинки[Строка].Значение <> "" Тогда
                    Верх = Страница.Cells(Строка+10, 3).Top + 1;
                    Лево = Страница.Cells(Строка+10, 3).Left + 1;
                    ШиринаЯчейки = Страница.Cells(Строка+10, 3).width - 2;
                    ВысотаЯчейки = Страница.Cells(Строка+10, 3).height - 2;
                    Картинка = Страница.Shapes.AddPicture(мКартинки[Строка].Значение, Ложь, Истина, Лево, Верх, ШиринаЯчейки, ВысотаЯчейки);
                    Картинка.LockAspectRatio = 1;
                    Картинка.PictureFormat.Parent.LockAspectRatio = 1;
                    Картинка.Placement = 1;
                КонецЕсли;
            КонецЦикла;
            
            Книга.Save();
            ОкноExcel.ActiveWorkbook.Close();
            ОкноExcel.Quit();

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