excel中怎么计算两个单元格中相同的字符

就是图片中 的数字怎么快速用公式求出来

1. 因为你给的数据没有行标和列标，故以下代码都是以【A1】单元格为开始的。

2. Sub aa()

Set regx = CreateObject("vbscript.regexp")
With regx
.Global = True

For Each Rng In [a1:a3]
For i = 1 To Len(Rng)
.Pattern = Mid(Rng, i, 1)

If .test(Rng.Offset(0, 1)) Then
x = x + 1
End If


Next
Rng.Offset(0, 2) = x
x = 0
Next

End With
End Sub3.经过实际测试，可用。4，记得采纳最佳答案啊。