Question

excel中VBA窗体复合框怎么设置菜单

这个窗体的复合框的下拉菜单我用了
Private Sub UserForm_Initialize()
CO_selection.AddItem "CALL"
CO_selection.AddItem "PUT"
End Sub
来设置，但是如何默认窗体出现的时候复选框内显示CALL呢……
下拉框菜中单需求“CALL”和“PUT”两项

接着是关于OK的代码

选择CALL之后按OK，要弹出inputbox

这个inputbox中annuler指向关闭对话框，OK则反馈在以下表格中

其中左列黑色数值都是固定的，红色sigma为未知数。右侧C后面对应的数值（设为E10）即为第二步中inputbox中填入的数值。E10中已有与sigma（左列红色部分单元格，设为D8）相关的公式，该公式中sigma为已知数C为结果，也就是说相当于一个单变量求解，通过填入C（E10）的数值来计算出sigma（D8）。

若第一步中在下拉菜单中选择PUT，则只需将第二步中的“CALL”都改成“PUT”，第三步中填入的数值为P（E12），依旧是求解sigma（D8）的数值，其余都一样。

2.除去以上的这个窗体，还有另一个窗体

其中同样是复合框不会设置……
选择CALL时文本框中显示的是“COURS du CALL（en euro）：”
选择PUT时文本框显示“COURS du PUT（en euro）：”
5,00是弹出窗体后用户通过滚动条输入的数字（如何设置滚动条）
OK之后类似前面那个窗体的后期程序，直接将数值填入E10然后来计算D8

跪求大神！

好像发邮箱就会被屏蔽……如果能解答的话会追加的！！！





Answer 1

1、显示call——设置text属性为call就OK啦
2、为call时，单击OK按钮，弹出inputbox对话框，OKbutton设置click事件代码，if listbox(下拉列表框)text=“call” then userform1.show(加载窗体，这个要具体设置)
3、其他的太复杂了