Excel VBA教程:Intersect方法

返回一个Range对象,此对象代表两个或多个范围重叠的矩形区域。

expression.Intersect(Arg1, Arg2, ...)

expression   可选。该表达式返回一个 Application对象。

Arg1, Arg2, ...   Range 类型,必需。重叠的区域。必须指定至少两个 Range对象。

Excel VBA教程:Intersect方法·示例

本示例在 Sheet1 中选定两个命名区域 rg1 和 rg2 的重叠区域。如果所选区域不重叠,本示例将显示一条相应的信息。


Worksheets("Sheet1").Activate
Set isect = Application.Intersect(Range("rg1"), Range("rg2"))
If isect Is Nothing Then
    MsgBox "Ranges do not intersect"
Else
    isect.Select
End If

上页:Excel VBA教程:InsertIndent方法 下页:Excel VBA教程:Item方法

Excel VBA教程:Intersect方法

Excel VBA教程:Item方法 Excel VBA教程:Justify方法
Excel VBA教程:LargeScroll方法 Excel VBA教程:LegendEntries方法
Excel VBA教程:LineGroups方法 Excel VBA教程:LinkInfo方法
Excel VBA教程:LinkSources方法 Excel VBA教程:List方法
Excel VBA教程:ListFormulas方法 Excel VBA教程:ListNames方法
Excel VBA教程:Location方法 Excel VBA教程:MacroOptions方法
Excel VBA教程:MailLogoff方法 Excel VBA教程:MailLogon方法
Excel VBA教程:MakeConnection方法 Excel VBA教程:Merge方法
Excel VBA教程:MergeWorkbook方法 Excel VBA教程:Modify方法
Excel VBA教程:Modify方法 (FormatCondition对象) Excel VBA教程:Modify方法 (Validation对象)
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号