仅查找匹配字符串是单元格第一部分的位置

时间:2017-06-23 00:50:37

标签: excel vba

我正在使用VBA在电子表格中搜索字符串的外观:

Range("A:A").Find(What:="B ", After:=ActiveCell, LookIn:=xlValues, _
      LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
      MatchCase:=True, SearchFormat:=False).Activate

这很好用,但会拉出“B xyz”和“xyzB abc”。我只想要第一个实例,B前面什么都没有。我知道如果我想找到第二个实例,我可以在我的What(例如“* B”)中使用通配符,是否有“负面” “我可以用来表示”B“需要成为牢房中第一件事的角色?

谢谢!

1 个答案:

答案 0 :(得分:0)

B 之后使用通配符xlWhole

Sub ngfdcvb()
    Dim r As Range
    Set r = Range("A:A").Find(What:="B*", After:=ActiveCell, LookIn:=xlValues, _
          LookAt:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
          MatchCase:=True, SearchFormat:=False)

    MsgBox r.Value
End Sub

enter image description here