Question

在sheet2中，我有数据键值。例如：

1 Thomas
2 Michael

在sheet1中，我会使用带有项目（键）的组合框。如果我从组合框中选择例如键1然后在组合框旁边（在单元格中），我会看到值Thomas。使用VBA非常容易，但我需要很多这样的组合框。因此，如果我使用VBA然后为每个组合框我必须复制相同的VBA代码。

我们可以在没有VBA的情况下完成吗？我们可以使用任何公式吗？你有什么主意吗？如果没有，我如何在VBA中为所有组合框创建一个代码？

Answer 1

是的，请查看组合框的数据验证以获取密钥，并查看值的VLOOKUP。不需要VBA。

Answer 2

如果你想使用VBA，我会推荐这样的东西：

Sub ComboBox1_Change()
     getName(ComboBox1.Value, "A3")
End Sub

Sub ComboBox2_Change()
     getName(ComboBox2.Value, "A7")
End Sub

Sub getName(key as Integer, destCell as String)
    Sheet1.Range(destCell).Value = Sheet2.Cells(key, 2).Value
End sub

使用WithEvents有一个更复杂的解决方案......

我会选择@Robert Co的想法

很多具有键值对的组合框

2 个答案: