Question

在Excel 2007 VBA中 - 下面的我的匹配语句未找到文本。它在那里，并在指定的范围内。我没有得到不寻常的错误。它只是没有找到。这是AZ65格式的全文 - 更多与“Cricut Shoulder Bag”相关的项目

If Not IsError(Application.Match("More items related to*", Range("az1:ba1000"))) Then
removeSomeRows = Application.Match("More items related to*", Range("az1:ba1000"))
Range("az" & removeSomeRows & ":" & "bz1000").ClearContents
End If

在工作表上，这也无法正常工作

=MATCH("More items related to*",AZ1:Ba1000)

Answer 1

您必须使用MatchType为0才能使用通配符（*或？），请参阅：http://office.microsoft.com/en-001/excel-help/match-function-HP010062414.aspx

使用Application.Match("More items related to*", Range("AZ1:AZ1000"), 0)

Answer 2

或者，你也可以使用它：

Dim rng as Range

For Each rng in ActiveSheet.Range("AZ1:BA1000")
    If InStr(1, "More items related to", rng) <> 0 Then
        rng.ClearContents
    End If
Next

Excel 2007 VBA MATCH函数找不到匹配项，但该范围内是否存在匹配项？

2 个答案: