【问题标题】:Combobox on userform populating only after cancelling first attempt仅在取消第一次尝试后才会填充用户窗体上的组合框
【发布时间】:2015-01-30 18:29:12
【问题描述】:

我在一个模块中有一段代码:

UserForm1.Show
UserForm1.ComboBox1.clear
UserForm1.ComboBox2.clear
UserForm1.ComboBox1.List = Array("xxxxxxx", "xfdshthr", "tyetrert")

用户运行此代码以调出带有 2 个组合框的用户窗体,用户在第一个组合框中输入新值后需要清除第二个组合框。

奇怪的是,当我运行此脚本时,第一个组合框没有填充,因此我单击表单 (unload me) 上的取消按钮并再次运行上面的代码。这次组合框按预期填充。每次都会发生这种情况。

有人知道是什么原因造成的吗?

【问题讨论】:

    标签: excel combobox userform vba


    【解决方案1】:

    因为你运行了错误的程序:

    在加载用户表单时必须在用户表单中填充组合框/列表框。首选事件是 Userform_Initialize。 所以在设计模式下填写那个事件:

    Private Sub Userform_Initialize()
      combobox1.list=array("aaa","bbb","ccc")
    End Sub
    

    完成此操作后,命令“Userform1.show”将自动运行事件代码并填充组合框。

    【讨论】:

      猜你喜欢
      • 2017-04-07
      • 1970-01-01
      • 2021-11-26
      • 2020-04-03
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      相关资源
      最近更新 更多