Word VBA教程:InRange方法

如果返回值为 True,则应用本方法的区域或所选内容包含在由参数 Range 指定的区域内。

expression.InRange(Range)

expression   必需。该表达式返回一个 Range 或 Selection对象。

Range   Range对象,必需。指与表达式 expression 相比较的区域。

说明

本方法通过比较起始字符和结束字符的位置,判定表达式 expression 返回的区域对象或所选内容是否包含在指定的 Range 内。同时比较其文字部分的类型。

VBA示例

本示例确定所选内容是否包含在活动文档的首段内。


status = Selection.InRange(ActiveDocument.Paragraphs(1).Range)

本示例设置myRange 指向活动文档的第一个单词。如果myRange 不包含在所选内容中,则使所选内容包括myRange


Set myRange = ActiveDocument.Words(1)
If myRange.InRange(Selection.Range) = False Then myRange.Select

当所选内容位于脚注部分时,本示例显示一条消息。


If Selection.InRange(ActiveDocument _
        .StoryRanges(wdFootnotesStory)) Then
    MsgBox "Selection in footnotes"
End If

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号