如何在 VBA 中获取 Excel 列表值？

【问题标题】：How to get the Excel List values in VBA?如何在 VBA 中获取 Excel 列表值？
【发布时间】：2014-09-19 11:25:37
【问题描述】：

我有一个 Excel 工作簿，其中说我有一个单元格 A1，其中包含使用公式创建的下拉列表。这是一个动态列表，并且在其他输入上不断变化。例如 A1 将有一个 Apple、Orange、Pear 的下拉列表

我想在 VBA 中阅读此列表。谁能帮我吗。提前致谢

【问题讨论】：

【解决方案1】：

这是一个简单的例子 - 实际上你应该测试有验证，它是一个列表类型等：

Sub foo()
    Dim vList
    vList = Evaluate(Range("A1").Validation.Formula1)
End Sub

【讨论】：