(Excel) 的 Application.Intersect 方法

會傳回 Range 物件，代表兩個或多個範圍的矩形交集。 如果指定了來自不同工作表的一或多個範圍，則會傳回錯誤。

語法

運算式。交集 (Arg1、Arg2、Arg3、Arg4、Arg5、 Arg6、Arg7、Arg8、Arg9、Arg10、Arg11、Arg12、Arg13、Arg14、Arg15、Arg16、Arg17、Arg18、Arg19、Arg20、Arg21、Arg22、Arg23、Arg24、Arg25、Arg26、Arg27、Arg28、Arg29、Arg30)

expression 代表 Application 物件的變數。

參數

名稱	必要/選用	資料類型	描述
Arg1	必要	Range	交集的範圍。 必須至少指定兩個 Range 物件。
Arg2	必要	Range	交集的範圍。 必須至少指定兩個 Range 物件。
Arg3–Arg30	選用	Variant	交集範圍。

傳回值

範圍

範例

下列範例會選取 Sheet1 上兩個具名範圍 rg1 和 rg2 的交集。 如果選取的範圍沒有交集，本範例會顯示一個訊息。

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

下列範例會比較 Worksheet.Range 屬性、 Application.Union 方法和 Intersect 方法。

Range("A1:A10").Select                            'Selects cells A1 to A10.
Range(Range("A1"), Range("A10")).Select           'Selects cells A1 to A10.
Range("A1, A10").Select                           'Selects cells A1 and A10.
Union(Range("A1"), Range("A10")).Select           'Selects cells A1 and A10.
Range("A1:A5 A5:A10").Select                      'Selects cell A5.
Intersect(Range("A1:A5"), Range("A5:A10")).Select 'Selects cell A5.

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。