| |
Hiro さんおはようございます。
>> If Not Intersect(Target, Range("L:L")) Is Nothing Then
>
>の構文を以下のように書いても同様な動作を得られたのですが、
>
>If Target.Column = 12 Then
>
>動作上どのような違いがあるのかわかりません。
>もしよろしければ、教えていただけないでしょうか？
どちらも、TargetがＬ列にあるかを調べています。
分からないことがあれば、ＶＢＥのヘルブを利用するといいです。
以下ヘルブの引用です。
Intersect メソッド
複数のセル範囲の共有セル範囲を表す Range オブジェクトを返します。
expression.Intersect(Arg1, Arg2, ...)
expression 省略可能です。Application オブジェクトを返すオブジェクト式を指定します。
Arg1, Arg2, ... 必ず指定します。セル範囲 (Range オブジェクト) の名前を指定します。複数の Range オブジェクトを指定する必要があります。
使用例
次の使用例は、シート 1 にある 2 つの名前付きセル範囲 rg1 と rg2 の共有セル範囲を選択します。共有セル範囲がない場合は、メッセージを表示します。
Worksheets("Sheet1").Activate
Set isect = Application.Intersect(Range("rg1"), Range("rg2"))
If isect Is Nothing Then
MsgBox "共通部分がありません。"
End If
|
|
kobasan
- 06/7/2(日) 10:57 -
