Word VBA教程:IsEqual方法

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

expression.IsEqual(Range)

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

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

VBA示例

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


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

本例比较Range1Range2 是否相同。如果相同,将删除Range1 的内容。


Set Range1 = Selection.Words(1)
Set Range2 = ActiveDocument.Words(3)
If Range1.IsEqual(Range:=Range2) = True Then
    Range1.Delete
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号