具有命名范围

Question

我试图根据一个工作表中的值（“常量”）创建一个命名范围，然后在另一个工作表上填充一个下拉列表（“计算”）。我成功创建了命名范围并从“常量”工作表中为它们设置了适当的值，但是当我单击单元格时没有看到值的下拉列表。

我的代码如下：

'Create the named range
ActiveWorkbook.Names.Add Name:="sensorType", RefersToR1C1:= (Sheets("Constants").Range("M2:M3"))

'Set a validation list on the cells that refer to the named range
    With Sheets("Calculations").Range("B2").Validation 
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, _
            Operator:= xlBetween, Formula1:="=sensorType"
        .InCellDropdown = True
    End With 

运行代码时没有收到错误。我看到命名范围是正确创建的，但是在计算表（或任何其他表格）上的单元格B2中没有看到下拉列表。

另外，当我在计算工作表本身中尝试此操作时，请选择数据验证 - ＆gt;列表然后输入相应的命名范围= sensorType没有任何反应。我没有得到任何错误，即使在验证命名范围确实存在之后我也没有得到任何下拉框。这可能是工作簿设置问题吗？我已经在打开时启用了宏。

我将不胜感激。

谢谢你， 米歇尔