excel 投票统计问题

发布网友发布时间：2022-04-28 18:49

共1个回答

热心网友时间：2022-06-22 21:40

建议楼主这样做：

点击“提交”按钮以后，运行下面的代码（我这里假设楼主的控件是放在名称为 Sheet1 的工作表里的，楼主根据具体情况来调整）：

Private Sub 提交_Click()
'锁住三个选择按钮，以防重复选择
OptionButton1.Enabled = False
OptionButton2.Enabled = False
OptionButton3.Enabled = False
Sheet1.Cells(2, 4) = Sheet1.Cells(2, 4).Value - OptionButton1.Value * 1
Sheet1.Cells(3, 4) = Sheet1.Cells(3, 4).Value - OptionButton2.Value * 1
Sheet1.Cells(4, 4) = Sheet1.Cells(4, 4).Value - OptionButton3.Value * 1
MsgBox ("你已完成提交！")
'把提交按钮也给禁掉，让用户彻底打消重复选择的念头
提交.Enabled = False
End Sub

经过上面处理以后，用户不保存则无所谓。一旦保存，则下次打开的时候就会有问题了。因为这三个单选按钮和这个“提交”按钮都被禁掉了。所以，在打开这个工作簿的时候再把它们的 Enabled 属性重新激活就行了：

Private Sub Workbook_Open()
Sheet1.提交.Enabled = True
Sheet1.OptionButton1.Enabled = True
Sheet1.OptionButton2.Enabled = True
Sheet1.OptionButton3.Enabled = True
End Sub

追问

有点问题哦