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

我最好的尝试是这样的：

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

但是，这提示一个

应用程序或objectdefined错误

我不完全了解的情况下你的代码 - 这是在事件过程中吗？ – whytheq 2012-08-06 17:23:32

这是你有一个未处理的VBA错误时得到的错误。如果您添加错误处理，您将能够找出实际的VBA错误。 – RBarryYoung 2012-08-07 00:49:22

试试这个（久经考验）

Union(Tabelle1.Range("delCase"), Target).Name = "delCase"

2012-08-07 00:08:07

而不是试图将一个字符串分配给RefersTo，你可以直接指定Range（因为RefersTo的类型为variant）。将您的线路稍稍改为：

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

然后按预期工作。

如果您想更优雅的方式来做到这一点，请尝试：

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

2012-08-06 13:07:18

嗯，我无法得到任何一个工作......但3 upvotes意味着在你身边3他们工作，所以我肯定是失去了一些东西:) – 2012-08-07 00:08:02

啊，我看到了什么问题......你正在使用“ ;”。我想你有一个荷兰版本。由于其区域设置，此方法无法在所有系统上运行。最好使用联合方法。 – 2012-08-07 00:16:30

@SiddharthRout我在OP的语言环境中编写代码（我会猜测德语）。 – 2012-08-07 08:29:13

回答