Excel宏選擇2個特定單詞

Question

有人可以幫助我在Excel宏嗎？

我需要2個字是我之前定義並刪除它之間進行選擇..

例如：
「HTTP：！/ ertwertw4r％+ 53445433333/cat.jpgThere是狗」

，我需要選擇從文本的「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