excel - 形状(工作表)与控件(用户窗体)

Question

我正在尝试调用放置标签的工作表，但我想通过提供名称字符串来动态调用它。

我尝试了很多建议，这个给了我最大的希望:

Can I reference an object using a string?

我过去成功地达到了预期的效果，但这些应用程序都是基于用户表单的。这个没有用户表单，所以显然我不能使用 Userform.Controls？

建议改用 Shape ，但是每当我想更改形状的标题时，它都会说它没有该属性。我尝试过以奇怪的方式“组合”标签和形状，但当然我总是不匹配。

我将使用链接答案中的示例

Dim shpLabel As Shape

Set shpLabel = Sheet1.Shapes("labelnum" & i)
shpLabel.Caption = "some string"

显然这对某些人有用(可能是旧版本？)但对我来说，它总是返回该属性丢失。

我希望我不必做这样的事情:
Using string as object name

我想这样做的主要原因是速度和大小。该文件已经很慢了，我担心这样的递归代码只会使情况变得更糟。

Answer 1

它有点隐蔽，具体取决于它是哪种类型的标签:

如果是表单控件标签:

Sheet1.Shapes("LabelName").Textframe.Characters.Text = "Some string"

如果是 activex 控件标签:

Sheet1.OLEObjects("LabelName").Object.Caption = "Some string"