我如何使用 VBA 截断带有通配符的单词的一部分

Question

我在 AJ 列中有很多文本字符串（类别由 ;# 分隔）示例是单元格 AJ2 在每一行中都有（会计：和一些文本；#Business：和一些文本）。我想删除特定的类别字符串以及 AJ 列中以 "Business:" 或 ":#Business:

开头的任何内容

Answer 1

试试这个代码。

Sub test()
    Dim vDB, vSplit, s As String
    Dim n As Long, i As Long
    vDB = Range("aj2", Range("aj" & Rows.Count).End(xlUp))
    n = UBound(vDB, 1)
    For i = 1 To n
        s = vDB(i, 1)
        If InStr(s, "Business") Then
            vSplit = Split(s, "Business")
            s = Replace(s, "Business" & vSplit(UBound(vSplit)), "")
            If Right(s, 1) = "#" Then
                s = Left(s, Len(s) - 2)
            End If
            vDB(i, 1) = s
        End If
    Next i
    Range("ak2").Resize(n) = vDB
End Sub

我如何使用 VBA 截断带有通配符的单词的一部分

How do i truncated part of a word with a wildcard using VBA

excel

vba

wildcard