在单元格中获取combobox的值?

我有一个名为comboBox,我们称之为:“comboBox1”

我想从单元格引用comboBox1的值。

=if(comboBox1.Value=1,1,0) 

以上的想法是我正在寻找。 我知道我可以附加一个comboBox1,它填充一个单元格,可以被其他单元格读取,但是这只是引入了更多的移动部分和复杂性。

这一定是可能的,对吧? 任何帮助将是伟大的,谢谢!

Excel允许一个单元格链接ActiveX和一个窗体doropdown(组合)。 这将把值写入一个没有任何代码的单元格。

我认为这样的事情是可能的。

对于您的combobox更改事件,您将需要触发重新计算:

 Private Sub ComboBox1_Change() Application.Calculate End Sub 

接下来,您将需要添加一个自定义用户定义的函数。 这是Application.Volatile行的重要部分。 这将确保重新计算后,任何计算。

 Function GetComboVal(cmbName As String) As String Application.Volatile 'will always recalculate Dim cmb As OLEObject Set cmb = Sheet1.OLEObjects(cmbName) GetComboVal = cmb.Object.Value End Function 

所以在你的手机里,你需要使用这样的通话:

 =if(GetComboVal("ComboBox1")=1,1,0) 

这种技术的缺点是,如果你的工作表有很多计算,可能需要一段时间才能重新计算。

下午好,

将单元链接到combobox有一个更简单的方法。 在combobox的属性中,上面的ListFillRange是链接单元格。 你只要将这个单元格指定给你想要的combobox值就可以了。