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

Question

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

我的最佳尝试如下：

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

但这会提示

应用程序或对象定义错误

Answer 1

您可以直接分配Range（因为RefersTo的类型为variant），而不是尝试将字符串分配给RefersTo。将您的线路略微更改为：

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

然后按预期工作。

如果你想用一种更优雅的方式来做这件事，可以试试：

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

Answer 2

试试这个（尝试并测试）

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