excel - 如何在excel vba中获得选定的形状？

Question

我插入了一个智能艺术，并将其转换为形状。并通过单击选择一个形状。

现在我想获得选定形状的 Shape 对象。我已经尝试过了，但它会引发异常。

dim shap as Excel.Shape = ExcelApp.Selection 

我可以通过迭代 ActiveSheet.Shapes 或像这样来获取形状对象

dim shap as Excel.Shape = ActiveSheet.Shapes.Item(1) 

但是我怎么知道这个形状是否被选中，真的需要帮助谢谢。

Answer 1

试试 Selection.ShapeRange获取对形状对象的引用。