如何使用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