excel - 在单元格中查找字符串

Question

我正在尝试检查字符串 NAME存在于事件单元格中，如果存在，程序应忽略该单元格。如果不存在，则必须删除该单元格的内容。这是我的代码:

Sub Search()

    Range("B3").Select
    If ActiveCell.Find(What:="NAME") = False Then ActiveCell.Clear

End Sub

我不明白为什么它不起作用。如您所见，我现在只检查单元格 B3。

Answer 1

这完全取决于您要查找的匹配类型。那么你想找到什么？一场完整的比赛？部分匹配？区分大小写的匹配？

一)完全匹配 + 区分大小写

在这种情况下，单元格值必须是 "NAME" . " NaMe" 等实例, "NAme" , "name"等将不匹配。

If ActiveCell.Value <> "NAME" Then ActiveCell.ClearContents

B) 完全匹配 + 不区分大小写

If UCase(ActiveCell.Value) <> "NAME" Then ActiveCell.ClearContents

或者

If LCase(ActiveCell.Value) <> "name" Then ActiveCell.ClearContents

在这种情况下，单元格值必须是 "NAME"或 "NaMe"诸如 " NaMe" 之类的实例, "Surname"等将不匹配。

C) 部分匹配 + 区分大小写

If InStr(1, ActiveCell.Value, "NAME") = 0 Then ActiveCell.ClearContents

在这种情况下，单元格值必须包含 "NAME" .例如 NAME GAME . SURNAME诸如 "My Name is Sid" 之类的实例, "What's in a NAMe"等将不匹配。

D) 部分匹配 + 不区分大小写

If InStr(1, ActiveCell.Value, "NAME", vbTextCompare) = 0 Then ActiveCell.ClearContents

在这种情况下，单元格值必须包含 "NAME" . Case没关系。例如 NAME GAME , SURNAme , "My Name is Sid" , "What's in a NAMe"等等

这是不同场景的快照。



备注 : 如果你想使用 .FIND然后看 THIS LINK .基于以上场景，你将不得不玩

LookAt:=可以带xlPart或 xlWhole作为它的论点之一。

MatchCase:=可以带True或 False作为它的论点之一。