根据 Combox 选择的单元格填充 Userform 文本框

Populate Userform textbox based on cell selected by Combox

在我的 excel 文档中,我在两列中包含以下信息:

US Dollar (USD)                     1
British Pound (GBP)                 0.63
Guatemalan Quetzal (GTQ)            0.13
Honduras Lempira (HNL)              0.046
Other                               Please give factor
Other                               Please give factor
Other                               Please give factor
Other                               Please give factor

我有一个由第一列填充的组合框:

Private Sub UserForm_Initialize()
CurrencyList.List = Worksheets("MySheet").Range("A23:A30").Value
End Sub|

我想在下一列中使用货币换算自动填充文本框,因此当您 select 组合框中的货币时,它会自动填充文本框,因此您可以按照建议保留或更改它如果你希望。我在 mac 和 excel 2011。我遇到的所有解决方案似乎都适用于 windows,但我收到错误消息,说我调用的方法不存在。

这应该可以帮助您入门。它使用您的值(您已经拥有)填充表单组合框,并且 Vlookup 查找与组合框中的值关联的货币。仔细检查您的 ComboBox 和 TextBox 名称 属性 是否与您的代码匹配。

Private Sub UserForm_Initialize()

    ComboBox1.List = Worksheets("Sheet1").Range("A23:A30").Value

End Sub

Private Sub ComboBox1_Change()

    TextBox1.Text = Application.VLookup(ComboBox1.Value, Worksheets("sheet1").Range("A23:B27"), 2, False)

End Sub