Question

Excel VBA选项按钮的问题

Excel VBA 的用户窗体userform1上设置一个选项按钮OptionButton1有两个选择，分别为男和女，如果选择男，表格中的sheet1中的a1单元格等于1，如果选择女，表格中的sheet1中的a1单元格等于2

Answer 1

1.打开Excel软件，在工具栏空白处，右键点击，在弹出的选项中，选择“自定议快速访问工具栏”。

2.切换到“自定义功能区”，并在右侧选择开发工具，然后确定。

3.这样之后就以在菜单栏中看到开发工具了，切换开发工具界面下,选择插入工具，可以看有两个按钮图标。

4.第一个是表单控件，一般是用于操作宏的，可以先对宏进行录制或者指定，这样就可以在表格创建一个按钮了。

5.第二个是ActiveX，一般是用来执行VBA编程的，在设计模式下，双点该按扭就能进么到VBA编程环境中。

Answer 2

在工程中打开Form后，在 视图 菜单中点击 工具箱，添加两个OptionButton，然后在选项按钮的属性窗口中定义Caption为“男”“女”，再将GroupName属性设置为相同的名字比如Sex就可以了。

附件可参考，提问者下载不需要财富值

Answer 3

Sheet1.[a1]=Iif(OptionButton1.Value,1,2)

追问

两个选择项怎么从用户窗体上绘制出来？

追答

要使用窗体，还有其他相应设置和代码支持，如果连怎么放置控件都还不知道，我建议你还是放弃，或者找一本VBA基础教材从头学一下，否则，即使告诉你，后面你也无法实现。

追问

没你说的那么玄乎，框架把两个复选按钮框起来，不然的话会与其他选项按钮冲突，输入代码
Sheet1.[a1] = IIf(OptionButton1.Value, 1, 2)

Sheet1.[a1] = IIf(OptionButton2.Value, 2, 1)分别放入两个选项按钮的click事件中去

就OK了