如何将shape.fill.userpicture从一个形状设置到另一个形状

我希望将一个形状（其中形状3包含用户图片）的填充属性设置为另一个形状的填充属性，但似乎不可能。 这是我的代码。

Sheet1.shapes("Rectangle 5").Fill = Sheet1.shapes("Rectangle 3").Fill 

如果还试过。

 Sheet1.shapes("Rectangle 5").Fill.UserPicture = Sheet1.shapes("Rectangle 3").Fill.UserPicture 

请指教。

谢谢，

Answer 1

UserPicture是一种方法，它似乎不可能采取用这种方法应用的形状图片的信息。

我所能提出的，正是在我所做的简单testing中，努力朝着这个方向前进 – 通过调用这两行：

 Sheet1.shapes("Rectangle 3").PickUp Sheet1.shapes("Rectangle 5").Apply 

因此，来自“矩形3”的图片将被应用于“矩形5”。 但是，其他一些属性也可以在维度保持不变的情况下进行更改。