关于Excel中按钮的问题

发布网友发布时间：2023-06-19 04:38

共4个回答

热心网友时间：2024-10-21 16:44

增加一个userform,添加5个OptionButton工具，增加一个CommandButton工具。

而后使用如下代码。

需要补充一点，这五个任务（模块）需要放置在公用模块中，并且需要改名（例如M1,M2等），因为宏名不支持逗点。

Private Sub CommandButton1_Click()
If UserForm1.OptionButton1.Value = 1 Then
M1
End If
If UserForm1.OptionButton2.Value = 1 Then
M2
End If
If UserForm1.OptionButton3.Value = 1 Then
M3
End If
If UserForm1.OptionButton4.Value = 1 Then
M4
End If
If UserForm1.OptionButton5.Value = 1 Then
M5
End If
End Sub

追问非常感谢您的回答，由于我是菜鸟级，琢磨了很长时间，还是搞不懂，不知能否说得再详细些，再次感谢！

追答

插入模块，将五个宏代码全部放在公用模块里面。

插入用户窗体,插入五个单选框.插入一个确定按钮，而后复制如下代码，M1,M2,M3,M4和M5是宏名。

热心网友时间：2024-10-21 16:44

设置一个变量i
将这个变量同时赋值给控件序号和工作表序号，但必须保证控件的序号是连续的。追问感谢您的回答，我还是不太懂，能否说得稍详细些，谢谢！

热心网友时间：2024-10-21 16:45

单独提出一个单元格，里面的内容为1-5，点击按钮后，读取单元格内容，根据内容执行每个任务。

热心网友时间：2024-10-21 16:46

插入一个userform不就好咯。点击那个按钮就出现那个userform让人选择追问感谢您的回答，从哪里插入一个userform？

追答alt+F11，进入vba编辑。然后可以插入窗体，在窗体上面画5个按钮。更多的请百度一下vba窗体