excel - Excelマクロは2つの特定の単語を選択します.

Question

誰かがExcelマクロで私を助けてくれますか?

以前に定義した2つの単語から選択して削除する必要があります..

例:
「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