[已解决]求助：按钮控件的问题

走进EXCEL

求助：按钮控件的问题，谢谢！

最佳答案

月排行榜 / 总排行榜

liuguansky

2011-9-16 17:08

1. Private Sub CheckBox11_Click()
   
2.     If CheckBox11.Value = True Then
   
3.         For s = 0 To 9
   
4.             If Me.Controls("CheckBox" & s + 1).Value = True Then
   
5.                 k = k & s
   
6.             End If
   
7.         Next s
   
8.         [g2] = k
   
9.         CheckBox11.Value = False
   
10.     End If
    
11. End Sub

复制代码

不明白你其实代码是什么意思，只是按我的意思写的。
请看附件效果。
求助00.rar (13.83 KB, 下载次数: 35)

2011-9-16 17:08 上传

点击文件名下载附件

跳转到最佳答案楼层

liuguansky

1. Private Sub CheckBox11_Click()
   
2.     If CheckBox11.Value = True Then
   
3.         For s = 0 To 9
   
4.             If Me.Controls("CheckBox" & s + 1).Value = True Then
   
5.                 k = k & s
   
6.             End If
   
7.         Next s
   
8.         [g2] = k
   
9.         CheckBox11.Value = False
   
10.     End If
    
11. End Sub

复制代码

不明白你其实代码是什么意思，只是按我的意思写的。
请看附件效果。
求助00.rar (13.83 KB, 下载次数: 35)

2011-9-16 17:08 上传

点击文件名下载附件

baojianming

如能达到楼主要求，不会不给最佳答案吧
求助00.rar (10.41 KB, 下载次数: 10)

2011-9-16 17:25 上传

点击文件名下载附件

风岚

我也想做个按钮，当A1=YES时，点按钮，运行宏，宏是要将B3+C3值填在D3