不用控件简单代码实现单选框功能

bb75308973

1. Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   
2. If Target.Column = 1 And Target.Row <> 1 Then
   
3.     If Target.Value = "√" Then
   
4.     Target.Value = "×"
   
5.     Exit Sub
   
6.     Else
   
7.     Target.Value = "√"
   
8.     Exit Sub
   
9.     End If
   
10. End If
    
11. End Sub

复制代码

双击单元格,勾变叉,叉变勾

过儿

有创意

ws278106483

{:021:}有点意思。{:021:}

另类2011

不好意思，我来说一下，你这个有什么用呢，如果能控制图表到可以一看，还有女的怎么能是麻子呢，打趣一下，哈哈

bb75308973

另类2011 发表于 2012-3-23 12:47
不好意思，我来说一下，你这个有什么用呢，如果能控制图表到可以一看，还有女的怎么能是麻子呢，打趣一下， ...

如果是控件的话你想想条件格式里面是不能调用Ture和False的
但是是符号
条件格式里则可以用是勾或者X来判断True和False
另外也打趣一下,那是因为麻子的老公口味重

另类2011

原来如此，不好意思，谢谢了