【问题标题】:Userform initialize messes with combo box options用户表单使用组合框选项初始化混乱
【发布时间】:2016-11-26 07:21:05
【问题描述】:

所以我有一个用户表单,并且组合框决定它不想显示选项。这是用户窗体初始化代码。

Private Sub VaporPressureUserForm_Initialize()
OptionButtonKelvin.Value = False
OptionButtonFahrenheit.Value = False
OptionButtonCelsius.Value = False
CheckBoxatm.Value = False
CheckBoxBar.Value = False
CheckBoxmmHg.Value = False
CheckBox.Valuepsia = False
ComboBox1.Clear
With ComboBox1
.AddItem "Methane"
.AddItem "Ethane"
.AddItem "n-Propane"
.AddItem "n-Butane"
.AddItem "n-Pentane"
.AddItem "n-Hexane"
.AddItem "n-Heptane"
.AddItem "n-Octane"
End With
End Sub

但这不起作用。组合框命名正确,用户窗体上的所有其他按钮都可以工作,但组合框不能。

此外,如果您认为解决方案是“将用户窗体初始化更改为只有 UserForm_Initialize 而没有开始部分”,那么当我之前这样做时,我会收到运行时错误“424”并且需要一个对象,这样问题就会有另外要修复用户表单才能正常工作。

提前感谢您的帮助!

【问题讨论】:

  • ComboBox1.ColumnCount和ComboBox1.ColumnWidths的值是多少?
  • (a) 代码是在用户窗体中,还是在“模块”中? (b) 尝试将Me. 放在对ComboBox1 的引用之前。 (c) 你越过了一条写着CheckBox.Valuepsia = False 的行,这让我觉得你的代码的第一行没有Option Explicit - 请把它放在那里(它会突出显示很多错误,这将让我们更好地了解您的问题是什么)。
  • 它是 checkbox.valuepsia = false...我对我花了多少时间试图解决这个问题感到非常生气。再次感谢。

标签: excel combobox userform vba


【解决方案1】:

问题是我有 CheckBox.Valuepsia 而不是 CheckBoxpsia.value...我很愚蠢

【讨论】:

    猜你喜欢
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2015-11-30
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2018-07-08
    相关资源
    最近更新 更多