如何獲取VBA中的Excel列表值？

Question

我有一個Excel工作簿，其中說我有一個單元格A1使用公式創建的下拉列表。 這是一個動態列表，並不斷更改其他輸入。 例如 A1將有一個Apple，Orange，Pear的下拉列表

我想在VBA中讀取此列表。誰能幫我嗎。在此先感謝

Answer 1

這裏有一個簡單的例子 - 在現實中你應該測試有驗證，這是一個列表等類型：

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