Excel VBA使用变量设置命名区域

Question

我使用VBA代码来查找特定列，并将列位置保存为Double。从那里，我试图在下面设置一个等于它的命名范围。当我运行代码时，出现运行时'1004'错误。有任何想法吗？

Sub namedRangeUpdate() 
Dim namedRangeReference as double 
namedRangeReference = ActiveCell.Column 
ActiveWorkbook.Names("TM_New").RefersToR1C1 = "='Raw Data'!C" & namedRangeReference 
End Sub 

当我运行该程序，即使它在最后一行的错误，当我将鼠标悬停在namedRangeReference，它反映namedRangeReference = 32。该代码获取该列号，但它没有进入命名范围。

Answer 1

想通了;无效的编码。这像一个魅力。

ActiveWorkbook.Names.Add Name:="TM_New", RefersToR1C1:="='Raw Data'!C" & namedRangeReference