У меня есть лист, который я использую для создания спортивных карточек.На моем листе 15 карточек, каждая с изображением, созданным с помощью «INSERT -> Picture» и выбирающим PNG или JPG на моем компьютере.
Однако, поскольку этот лист является шаблоном, используемым для многих команд, я хотел бы иметь возможность создать некоторый код, который позволит мне выбрать одно изображение, изменить его на новый логотип и скопировать это изображение на оставшиеся14 по нажатию кнопки.Я пробовал несколько разных вещей, все из которых были разные варианты:
Dim setLogo As Picture
Dim logo1 As Picture
Set setLogo = Sheets("Team Cards").Images("LOGO_SET")
Set logo1 = Sheets("Team Cards").Images("LOGO1")
logo1.Picture = setLogo.Picture ' also tried UserPicture
Я гуглил, но не могу найти код, который это сделает.Я также возился со свойством PictureData, но не смог заставить его работать, все они заканчивались ошибкой.Я видел некоторые вещи об удалении изображения и повторной вставке нового, который я мог бы попробовать затем, но я надеюсь, что мне просто не хватает какого-то свойства, которое делает это для меня.Можете ли вы помочь с правильным кодом?