Sub select多条件判断() Select Case Sheet1.[b1].Value Case Is > 0 MsgBox "大于0" Case Else MsgBox "小于或等于0" End Select End Sub
Sub select多条件判断2() Select Case Sheet1.[b1].Value Case "12" Sheet1.[a1] = "你输入的值为12" Case Else Sheet1.[a1] = "你输入的值不是12" End Select End Sub
转载请注明作者与出处:http://blog.csdn.net/u013511642 王小涛_同學
时间: 2024-10-02 14:22:10