关于VBA optionbutton的问题
两个optionbutton,一个35,一个36subsheet2_optionbutton35_clickSheets("Sheet2").optionbutton36...
两个optionbutton,一个35,一个36
sub sheet2_optionbutton35_click
Sheets("Sheet2").optionbutton36.value=false
end sub
sub sheet2_optionbutton36_click
Sheets("Sheet2").optionbutton35.value=false
end sub 运行的时候第一个运行出现问题,第二个没问题另外
if Sheets("Sheet2").optionbutton35.value=ture then 运行的时候也出错 展开
sub sheet2_optionbutton35_click
Sheets("Sheet2").optionbutton36.value=false
end sub
sub sheet2_optionbutton36_click
Sheets("Sheet2").optionbutton35.value=false
end sub 运行的时候第一个运行出现问题,第二个没问题另外
if Sheets("Sheet2").optionbutton35.value=ture then 运行的时候也出错 展开
1个回答
展开全部
晕头转向!
你的控件名到底是sheet2_optionbutton35,还是optionbutton35?
如果是optionbutton35,那么sheet2_optionbutton35_click ()这个事件的用法就是错的!不需要前置指定Sheet2,只需要写成Sub Optionbutton35_Click()即可!
如果是控件名是sheet2_optionbutton35,那么调用控件的时候就应该是
Sheets("Sheet2").SHeet2_optionbutton36.value = false
再另外,如果35和36是一个组内的单选按钮,那么根本就不需要你再另外写代码切换,系统将自动在这两个控件之间切换的!
最后另外:是True不是ture。
如果你非要自己写代码切换,那么最好改成如下:
Sub Optionbutton35_click()
MsgBox "A"
Sheets("Sheet2").OptionButton36.Value = False
End Sub
Sub Optionbutton36_click()
MsgBox "B"
Sheets("Sheet2").OptionButton35.Value = False
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询