如何使用Excel VBA将图像复制到另一图像

Question

我有一张用来制作运动卡的纸。我的工作表中有15张卡片，每张卡片上都有一张由“插入->图片”创建的图像，并从计算机中选择了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属性，但是无法正常工作，它们都以抛出错误为结尾。我看到了一些有关删除图像并重新插入一个新图像的信息，我可以在下一步尝试，但是我希望我只是缺少一些可以为我完成此操作的属性。您可以提供正确的代码协助吗？