Question

我知道这很简单但很难在Google或此网站上找到解决方案。我在工作簿中打开了一个子组件，用.additem例程填充组合框。这可以找到，但实际上我想要做的是告诉它显示下面的文本，以便我的模板在用户打开时看起来很整洁。

我如何不仅添加项目，还让组合框显示所需的文本？

Sheets("Data Summary").CB_Server.AddItem "Select Server"
Sheets("Data Summary").CB_Server.AddItem "UK1-SQL-T002"
Sheets("Data Summary").CB_Server.AddItem "UK1-SQL-T003"

Sheets("Data Summary").CB_Portfolio.AddItem "Select Portfolio"

因此，在此示例中，我希望列出服务器，但希望在打开时显示Select Server和Select Portfolio。

由于

Answer 1

正如@Nathan_Sav评论的那样，您正在寻找组合框的.Value：

请在AddItem行之后添加以下两行：

Sheets("Data Summary").CB_Server.Value = "Select Server"
Sheets("Data Summary").CB_Portfolio.Value = "Select Portfolio"

VBA使用文本填充Combobox

1 个答案: