Word中的VBA分节符

时间:2009-09-30 09:36:27

标签: vba ms-word ms-office

如何检测您所包含的选择是否包含分节符?

目前我选择一个页面,折叠到最后,我想知道页面的末尾是否包含分节符。

我打算使用一种方法来比较页面末尾的节号,然后向前移动两个字符,然后检查节号。如果它们不同,那么我的页面末尾会有分节符 - 有更好的方法吗?

2 个答案:

答案 0 :(得分:2)

也许就是这些问题:

Function HasBreak() As Boolean

With Selection.Find
    .Forward = True
    .Execute FindText:="^b"

    If .Found Then
        HasBreak = True
    End If
End With

End Function

答案 1 :(得分:0)

干杯,这是一个很好的建议。

我最终的方式是获取页面和部分的范围,检查两个“结束”位置,如果它们相同则页面包含分节符。