如何在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

該文章以完全相同的問題涉及並提供解決方案。 這是一篇SO文章，提供了另一個很好的解決方案。