如何解决模糊字符串匹配 Excel
我目前需要一种模糊字符串匹配算法。我从这里给出的链接中找到了一个 VBA 代码:Fuzzy Matching。
Function FuzzyFind(lookup_value As String,tbl_array As Range) As String
Dim i As Integer,str As String,Value As String
Dim a As Integer,b As Integer,cell As Variant
For Each cell In tbl_array
str = cell
For i = 1 To Len(lookup_value)
If InStr(cell,Mid(lookup_value,i,1)) > 0 Then
a = a + 1
cell = Mid(cell,1,InStr(cell,1)) - 1) & Mid(cell,1)) + 1,9999)
End If
Next i
a = a - Len(cell)
If a > b Then
b = a
Value = str
End If
a = 0
Next cell
FuzzyFind = Value
End Function
然而,无论“正确答案”有多远,这都能为您提供匹配。有什么方法可以实现函数给出“N/A”,比如说,距离原始字符串有 4 个字符或更多?
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。