怎么用vba选中word中除标题、表格以外的正文？

怎么用vba选中word中除标题、表格以外的正文？
编写了很久，试了很多次都不对。

可以先录制一个宏，然后照着提供的代码编写

该回答引用GPTᴼᴾᴱᴺᴬᴵ
在 VBA 中，你可以使用 Range 对象和 Selection 对象来操作 Word 文档中的内容。要选中 Word 中除标题、表格以外的正文，可以使用以下代码：

Sub SelectMainText()
    Dim rng As Range
    Set rng = ActiveDocument.Range
    
    ' 选中整个文档内容
    rng.WholeStory
    
    ' 排除标题
    rng.Start = ActiveDocument.Sections(1).Range.End
    
    ' 排除表格
    Do Until rng.Tables.Count = 0
        rng.Tables(1).Range.Select
        Selection.Cut
        rng.End = ActiveDocument.Range.End
    Loop
    
    ' 选中除标题、表格以外的正文
    rng.Select
End Sub

这个代码中，我们首先定义了一个 Range 对象 rng，并将其设置为当前文档的整个内容。然后我们使用 Start 属性将光标移到文档的第二节，即排除了第一节中的标题。
·
接下来，我们使用一个循环来逐个排除表格。在循环中，我们首先选中第一个表格，并使用 Cut 方法将其剪切到剪贴板中，然后将 Range 对象的 End 属性设置为文档的末尾，以便继续查找下一个表格。
·
最后，我们使用 Select 方法选中除标题、表格以外的正文。此时，Range 对象中包含的就是你想要选中的内容。
·
请注意，这个代码中仅仅考虑了文档中的第一个节中的标题，并没有考虑其他节中的标题。如果你需要考虑多节中的标题，则需要对代码进行相应的修改。