迭代Excel下拉列表/验证列表

Question

我有一个带有验证列表的单元格，该列表会根据其他设置而改变。是否可以在代码中迭代该单元格？ 是否也可以将该单元格设置为列表中的第n个项目？

实施例： E2的下拉取决于为D2选择的内容。我希望能够遍历E2中的任何列表而无需检查D2。

谢谢。

Answer 1

这对你有用

Sub loopthroughvalidationlist()
     Dim inputRange As Range
     Dim c As Range
     Set inputRange = Evaluate(Range("D2").Validation.Formula1)
     For Each c In inputRange
        '... do something with c.Value
    Next c
End Sub