У меня есть надстройка, которая содержит электронную таблицу.Мне нужно обновить эту таблицу текстом, изображениями и форматированием из другого листа.
Код, используемый для этого:
ActiveWorkbook.Sheets("START").Cells.Copy Destination:=ThisWorkbook.Sheets("START").Range("A1")
Проблема заключается в том, что скопированные изображения нетот же размер или соотношение сторон, что и у оригинала.Я попытался вставить специальные изображения как .tif, .jpeg и .bmp в исходный лист, но безуспешно.Я также пытался изменить высоту в ThisWorkbook, но, похоже, он не позволяет изменять изображения.
Если кто-нибудь может предложить способ копирования изображений с оригинальным размером или изменения размера, это будет наиболее полезно.