Vba Excel VB：将单元格添加到现有名称

我正试图通过VB将一个单元格添加到现有名称中

我的最佳尝试如下所示：

Tabelle1.Names("delCase").RefersTo = Tabelle1.Names("delCase").RefersTo + ";" + Target.Address

但这引发了一场争论

应用程序或对象定义的错误

---

您可以直接分配

范围

（因为

referesto

属于

变体

）而不是尝试将字符串分配给

referesto

）。将您的线路稍微更改为：

Tabelle1.Names("delCase").RefersTo = Tabelle1.Range("delCase;" & Target.Address)

然后按预期工作

如果您想要更优雅的方式，请尝试：

Tabelle1.Range("delCase;" & Target.Address).Name = "delCase"

---

您可以直接分配

范围

（因为

referesto

属于

变体

）而不是尝试将字符串分配给

referesto

）。将您的线路稍微更改为：

Tabelle1.Names("delCase").RefersTo = Tabelle1.Range("delCase;" & Target.Address)

然后按预期工作

如果您想要更优雅的方式，请尝试：

Tabelle1.Range("delCase;" & Target.Address).Name = "delCase"

试试这个（试过并测试过的）

试试这个（试过并测试过的）

---

我不完全理解您的代码的上下文-这是在事件过程中吗？这是您在遇到未处理的VBA错误时遇到的错误。如果添加错误处理，您将能够找到实际的VBA错误。我不完全理解代码的上下文-这是否在事件过程中？这是发生未经处理的VBA错误时出现的错误。如果您添加错误处理，您将能够找到实际的VBA错误。嗯，我无法让任何一个工作。。。但是3张选票意味着在你旁边，他们中的3人成功了，所以我肯定错过了一些东西：）啊，我知道问题出在哪里了。。。您正在使用“；”。我猜你有荷兰语版本。由于区域设置的原因，此方法无法在所有系统上工作。最好使用union方法。@SiddharthRout我是在OP的语言环境中编写代码的（我猜是德语）。是的。我仍然觉得

Union

比使用“；”或“，”更好。没有混淆的余地，代码将在所有版本中都能工作：）嗯，我无法让任何一个工作。。。但是3张选票意味着在你旁边，他们中的3人成功了，所以我肯定错过了一些东西：）啊，我知道问题出在哪里了。。。您正在使用“；”。我猜你有荷兰语版本。由于区域设置的原因，此方法无法在所有系统上工作。最好使用union方法。@SiddharthRout我是在OP的语言环境中编写代码的（我猜是德语）。是的。我仍然觉得

Union

比使用“；”或“，”更好。没有混淆的余地，代码将在所有版本中工作：）