vba - 使用 VBA 在 Excel 中选择形状

Question

我正在尝试使用 VBA 按名称选择形状。在我的工作表中，我有 10 个形状，名称为 1 到 10，我想要一个特定的形状。出于某种原因，excel 使用我的代码选择的形状似乎不是我告诉它选择的名称的形状。据我所知，它选择的形状是随机的。这是我的代码(x 值应该检索我从 1 到 10 输入的数字值):

Sub FindTheShape()

Sheets("Fleet 1").Select
Dim x As Long
x = ActiveSheet.Range("$A$1000").End(xlUp).Value

ActiveSheet.Shapes(x).Select

End Sub

请帮忙，非常感谢任何想法。

Answer 1

你的 x 给出的是索引号而不是名字，当你的形状被命名为 1 到 10 时，从你的 x 中创建一个字符串:

ActiveSheet.Shapes(CStr(x)).Select