| |
▼ichinose さん：
こんばんは。
Intersectメソッド機能が、複数のセル範囲の共有セル範囲を表す Range オブジェクトを返すとはそういうことなのですね。
ありがとうございました。
>新規ブックの適当なシート（仮にSheet1としましょう）のモジュールに
>
>'====================================================================
>Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
> If Not Application.Intersect(Range("a1,b5,c10"), Target) Is Nothing Then
> MsgBox "対象セルがダブルクリックされました" & vbCrLf & Target.Address
> Cancel = True
> End If
>End Sub
>
>として当該シートのセルＡ１，Ｂ５，Ｃ１０をダブルクリックして見てください。
>
>又、その他のセルもダブルクリックして見て上記の３セルのそれとの動作の違いを
>確認して見てください。
確認してみます。
恐れ入りました。
|
|
にしもり
- 07/12/7(金) 18:34 -
