VBA修改命名范围RefersTo时单元格引用自动偏移问题排查

行号偏移是Excel命名范围的引用解析规则导致的，和你写的字符串本身没有直接关系：

• 你定义的引用='(T) Lines'!$D2是混合引用：列$D加了$属于绝对锁定，行号2没加$属于相对引用。
• 给RefersTo属性传入带相对引用的地址时，Excel不会直接存储你写的字面行号，而是以代码执行瞬间的活动单元格位置为基准，计算相对偏移后再存储实际引用地址。
• 你调试时输出变成$D3，说明触发这段Worksheet_Activate代码时，当前活动单元格刚好在工作表的第3行，相对基准偏移1行，最终存储的行号就从2变成了3。

根据你级联菜单的实际需求二选一即可：

1. 如果命名范围需要固定指向D列第2行的单元格，直接把地址改成全绝对引用，行号也加$锁定：

rng = "='(T) Lines'!$D$2"

2. 如果你的级联逻辑本来就需要用相对行引用（比如每一行的下拉要匹配本行的关联单元格值），那就在给RefersTo赋值前，先把活动单元格定位到目标工作表的A1单元格，统一相对引用的计算基准，避免偏移：

' 先切换引用计算基准到目标表A1
Application.Goto Worksheets("(T) Lines").Range("A1"), False
' 再执行命名范围赋值
With xName
    .RefersTo = rng
End With

注意：如果你的级联菜单用到了多个动态命名范围，每个范围赋值前都要确认引用类型、对齐计算基准，否则都会出现同类偏移问题。

内容的提问来源于stack exchange，提问作者Krono