在 VBA 中添加命名范围引用

Question

我正在尝试将字符串添加到命名范围的 Refersto 值。问题是字符串必须带有“=”才能与另一个内部工具一起使用。我可以轻松创建字符串，但是当我尝试添加引用时出现错误。有什么方法可以覆盖错误，并将带有“=”的字符串放在字符串的开头。下面是一个非常简化的模拟示例：

Public Sub AddReference() 

    ActiveWorkbook.Names.Add Name:="DG_PRINT_SETTINGS_001", RefersTo:="={""""001"""",""""print_settings""""}"

End Sub

任何有助于完成这项工作的帮助都会很棒，因为我无法更改流程的另一端，我需要硬塞这个才能工作。我知道它可能是因为它是在其他地方完成的，但是编写代码的人已经不在了，我不能问他......我有点 SOL

Answer 1

你需要注意字符串引号"

这会起作用：

 ActiveWorkbook.Names.Add Name:="DG_PRINT_SETTINGS_002", RefersTo:="={""001"",""print_settings""}"

Adding Named Range reference in VBA