遍历 Excel dropdown/validation 列表

Iterate through an Excel dropdown/validation list

我有一个单元格,其中的验证列表会根据其他设置而变化。是否可以在代码中遍历该单元格? 是否也可以将该单元格设置为列表中的第 n 项?

示例: E2 的下拉列表取决于为 D2 选择的内容。我希望能够遍历 E2 中的任何列表而不必检查 D2。

谢谢。

这对你有用

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