如何在Word中獲取VBA宏以刪除僅包含找到的文本的行，但不包含包含找到的文本和其他文本的行

Question

簡而言之，我發現多個問題和答案似乎只是部分內容我需要。

我需要什麼會做什麼，我在下面說明：

FindText ("Find me") 
If other text exists on this line Then 
With Selection.Find 
.Text = "Find me" 
.Replacement.Text = "Found you" 
.Execute Replace: [not sure what to put here] 

Else delete the entire line 

我知道這可能看起來有點古怪，但它是我被要求做一些事情，我無法找到任何答案任何地方給我我需要的東西。

編輯：要刪除的行只是一行文本。它只是一個可見的行，下一行是在回車後。

該刪除行下面的文檔的其餘部分在刪除空格時應該向上移動。

Answer 1

This文章處理完全相同的問題並提供解決方案。 Here是一個SO文章，提供了另一個很好的解決方案。