如何使用vba刪除word文檔的整行

Question

以下代碼行將文本插入到word文檔的書籤範圍中。

objDoc.Bookmarks("DonorAddress").Range.Text = "6200 Main St." 

如果我沒有任何地址數據，如何刪除包含地址書籤的整行？

Answer 1

'刪除行'我相信你的意思是'刪除段落'。如果是這樣，你可以做這樣：

'2 steps to delete- rather not recommended 
objDoc.Bookmarks("DonorAddress").Range.Paragraphs(1).Range.Select 
Selection.Delete 

或一步到位：

objDoc.Bookmarks("DonorAddress").Range.Paragraphs(1).Range.Delete 

Answer 2

如果「刪除行」是指刪除一個段落的只是一條線，下面是這樣的：

objDoc.Bookmarks("DonorAddress").Range.Paragraphs(1).Range.Select 
Selection.HomeKey wdLine 
Selection.EndKey wdLine, wdExtend 
Selection.Delete