VBA Excel宏 - 刪除2個第一個單詞後的文本

Question

我需要一個簡單的宏或Excel公式，我可以記錄刪除特定的列（F）所有文本afetr的前兩個單詞（有時只有1個單詞，有時3個-4）。

感謝您的幫助。

Answer 1

使用留下了查找和替代：

=LEFT(F1,FIND("}}}",SUBSTITUTE(F1," ","}}}",2)&"}}}")) 

---

的VBA使用UDF：

Function firstTwo(str As String) As String 
Dim strArr() As String 
strArr = Split(str) 
If UBound(strArr) = LBound(strArr) Then 
    firstTwo = strArr(0) 
Else 
    firstTwo = strArr(0) & " " & strArr(1) 
End If 

End Function 

你會調用它從片：

=firstTwo(F1) 

然後複製下來。