0

在 Excel 2007 VBA - 我的匹配语句下面没有找到文本。它在那里,并且在指定的范围内。我没有收到不寻常的错误。只是没有被发现。这是单元格AZ65中的全文-与“ Cricut单肩包”相关的更多项目

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)
4

2 回答 2

0

您必须使用 MatchType 0 才能使用通配符(* 或?),请参阅: http: //office.microsoft.com/en-001/excel-help/match-function-HP010062414.aspx

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

于 2013-07-15T16:30:40.403 回答
0

或者,你也可以使用这个:

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
于 2013-07-15T16:33:47.357 回答