前面章节我们介绍过VBA中的运算符，
VBA中常见的运算符
这节我们重点介绍下其中的LIKE，这是我们在工作表中没有接触过的。
LIKE是用来比较两个字符串是否相同。
语法：result = string like pattern
重点在于pattern中的字符的表达方式，？和 * 我们在工作表中用过，都比较熟悉了，#代表任意一个0-9之间的数字，也容易理解，主要是后面两种比较陌生。
举例：
"5" like "[4-6]" 的结果为ture，因为[4-6]表示4-6之间的数字，5在该范围内，所以为ture。
"5" like "[!4-6]"的结果为flase，因为 [!4-6]表示的是不在4-6之间的数字，而5却在该范围内，所以为flase。
"5" like"[567]"的结果为ture，因为[567]表示的是5或者是6或者是7，而非567，所以结果为ture。
注意：字符串记得用引号括起来。
了解了基本含义以后，我们来看下一个具体的实例：
按照条件求人数。
代码如下：
Sub 计数()
'定义两个变量，bd为表达式，cj为成绩
Dim bd As Range, cj As Range, n%
'在表达式列里循环出表达式及条件单元格，在成绩列里循环出cj单元格
For Each bd In [f2:f4]
For Each cj In [c2:c17]
'如果循环出的成绩等于循环出的表达式，则计数并累加
If cj.Value Like bd.Value Then n = n + 1
'循环成绩
Next cj
'把n值赋给相对bd单元格向下偏移一行，向右偏移两列的单元格（偏移起始位置包括本身的行和列）
bd(1, 2) = n
'把变量n的值归零
n = 0
'循环表达式列中的单元格
Next bd
End Sub
上面对每句代码都做了解释，大家可以仔细体会。
转自：米宏Office