当前位置: 代码迷 >> VBA >> 请问一个简单的判断语句
  详细解决方案

请问一个简单的判断语句

热度:8186   发布时间:2013-02-26 00:00:00.0
请教一个简单的判断语句
在EXCEL中.打开了VB编辑器.在sheet1中加入了一上控件:checkbox1   checkbox2
想实现一个简单的判断如下:
我在A1单元格中输入:CCEDFA   这样的一个字符串.
要求:如果这个字符的第一个字符为C的话,就让checkbox1为选中状态
如果第一个字符为A的话呢,就让第checkbox2为选中状态.
否则,checkbox1   和checkbox2都为非选中状态

谢谢了!!

------解决方案--------------------------------------------------------
CheckBox1 = False
CheckBox2 = False
If Left(Range( "A1 ").Text, 1) = "C " Then CheckBox1 = True
If Left(Range( "A1 ").Text, 1) = "A " Then CheckBox2 = True
  相关解决方案