IsEqual 方法

如果值为 True，则应用本方法的所选内容或区域等于 Range 参数所指定的区域。本方法比较起始字符和结束字符的位置和组成部分的类型。如果两个对象的三个项目都相等，则这两个对象相同。

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

Range   Range 对象，必需。指与表达式 expression 比较的 Range 对象。

示例

本示例对活动文档第二段和所选内容进行比较。如果所选内容与第二段不相同，则选定第二段。

If Selection.IsEqual(ActiveDocument _
        .Paragraphs(2).Range) = False Then
    ActiveDocument.Paragraphs(2).Range.Select
End If

本例比较 Range1 与 Range2 是否相同。如果相同，将删除 Range1 的内容。

Set Range1 = Selection.Words(1)
Set Range2 = ActiveDocument.Words(3)
If Range1.IsEqual(Range:=Range2) = True Then
    Range1.Delete
End If