在宏中使用下拉值

Question

我在excel表中有一个下拉列表。它具有值

• NEW
• DELETION
• SUSPENDED

我想利用这些值来执行某些操作。比如，如果Cell的值是NEW，则应该检查然后再进一步工作。 当我在VBA中编写下面的代码时，它不起作用。

If Sheet5.Range("B16").Value = "NEW" Then 
    .... Perform some action...

上述行不会有效吗？我无法将价值与“新”进行比较。

请注意：下拉列表是excel表格。如何在宏中检索此Excel工作表下拉列表值？

Answer 1

这不是下拉列表，而是验证列表，它是从数据功能区创建的，如：

因此，基础单元格（在您的情况下为E1）的行为类似于普通单元格，但它只能接受某些值。您可以按预期方式在VBA中访问其属性，例如：

Debug.Print Range("E1").Value

因此，如果从Developer | Macros菜单调用宏，或者使用F5键从VBE运行宏，则代码应该有效。