excel - Excel 宏在 2 个特定单词之间进行选择

Question

有人可以在 Excel 宏中帮助我吗？

我需要在我之前定义的两个词之间进行选择并将其删除..

例如：
“http://ertwertw4r!%!+53445433333/cat.jpg有一条狗”

我需要从“http:”到“.jpg”中选择文本并将其删除或替换为“”，因为我只需要“有一只狗”字样......

Answer 1

尝试这个：

Dim firstStr As String
Dim secondStr As String
Dim Str As String

Dim pos1 As Integer
Dim pos2 As Integer

firstStr = "http:"
secondStr = ".jpg"


For i = 1 To 500

    Str = Cells(i, 1) ' here i represents row, and 1 means first column

    pos1 = InStr(UCase(Str), UCase(firstStr))
    pos2 = InStr(UCase(Str), UCase(secondStr))

    If pos1 = 0 Or pos2 = 0 Then
        ' MsgBox "Something goes wrong"
    Else
        StringToDelete = Mid(Str, pos1, pos2 - pos1 + Len(secondStr))
        finalString = Replace(Str, StringToDelete, "")
        ' MsgBox finalString
        Cells(i, 1) = finalString
    End If

Next i