ActiveX ComboBox来驱动工作簿格式

时间:2018-05-23 14:53:38

标签: excel vba activex

我想使用ActiveX ComboBox来驱动Excel工作簿的格式。

相关性详情:

- ComboBox name: ComboBox1
- ComboBox options: Total, Products, Services

到目前为止我的宏:

Sub ComboBox1_Change()
  Value = ComboBox1
  Case Total
  MsgBox "Total"
  Case Blank
  MsgBox "Products"
  Case Products
  MsgBox "Services"
  End Select
End Sub

为了测试它的工作情况,我只是简单地包含了消息显示,但是一旦所有内容顺利运行,这将被修改。

提前致谢!

1 个答案:

答案 0 :(得分:0)

看起来你正试图做这样的事情:

Sub ComboBox1_Change()
  Select Case ComboBox1.Value
    Case "Total"
      MsgBox "Total"
    Case "Blank"
      MsgBox "Products"
    Case "Products"
      MsgBox "Services"
  End Select
End Sub

这是否符合您的需求?