ExecuteMso - 更改图片 > 从文件

Question

我想创建一个按钮，用于打开 Excel 中的更改图片功能。我希望用户能够在需要时单击图片上方的按钮来更改图片。

有人可以告诉我为什么这个宏不起作用吗？

Sub ChangePicture()
ActiveSheet.Shapes.Range(Array("PIC_RENTCOMP1A")).Select
CommandBars.ExecuteMso ("PictureChange")
End Sub

我想要具有与右键单击 > 更改图片 > 从文件相同的功能...

提前致谢。