分割從excel中的特定單詞開始的單元格

Question

我有一個包含句子的單元格的excel文件。在這個句子中有一個單詞，我希望我的單元格在這個單詞之後被分割。這個單詞使得分割應該被自動刪除，如果它有效的話，如果它不能保留。

我該怎麼做？

Answer 1

說出這個詞是qwerty。之前：

選擇要處理和運行此短宏小區：

Sub ytrewq() 
    Dim qwerty As String, r As Range 
    Dim v As String 

    qwerty = " qwerty " 

    For Each r In Selection 
     v = r.Text 
     If InStr(1, v, qwerty) > 0 Then 
      r.Value = Split(v, qwerty)(0) 
      r.Offset(0, 1).Value = Split(v, qwerty)(1) 
     End If 
    Next r 
End Sub 

來實現：