ＥＸＣＥＬＶＢＡのイベントプロシージャ

質問

ＥＸＣＥＬのＶＢＡでダブルクリックイベントプロシージャについて質問です。

したいこと。

ある管理表がありその表の索引番号といくつかの項目が並んでいる表です、
その表を見て索引番号をダブルクリックするとその索引番号の表題部と明
細部を単票（カード）形式で表示するようなものをつくりたいと思っています。

困っているところ。
ダブルクリックのイベントプロシージャでこれを実現しようとしているのですが
うまくいかなくて困っています。

ダブルクリックのイベントプロシージャでその値（ここでは索引番号）がTarget
にはいるのですがその値は他のプロシージャに渡す方法がわかりません。

あるいは、イベントプロシージャの仕様としてTargetの値は当該プロシージャ内
でしか保持できないのでしょうか？

他のプロシージャでもその値を使いたいのですがダブルクリックイベントの値を
他のプロシージャで使う方法がありましたら教えてください。

回答No.1

kmetu · ベストアンサー

たとえば

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

Call test(Target)

End Sub

Private Sub test(ByVal Myhonyahonya As Range)

Debug.Print Myhonyahonya.Address

End Sub

こんな感じでTargetの値をtestプロシージャでMyhonyahonyaという変数で利用できます。

回答No.3

keithin

＞その値は他のプロシージャに渡す方法がわかりません。

他のプロシジャを例えばModule1に用意してあるなら

シートモジュール：
private sub Worksheet_BeforeDoubleClick(byval Target as range, Cancel as boolean)
　if application.intersect(target, range("A:A")) is nothing then exit sub
　module1.macro1 target.value
　cancel = true
end sub

Modlue1:
sub macro1(byval a as variant)
　msgbox a
end sub

値を渡したいなら、その通り値を渡すだけです。

回答No.2

kmetu

おまけ

Private Sub test(ByVal Myhonyahonya As Range)

以外に

Private Sub test(ByRef Myhonyahonya As Range)

とすることもできますが、後者の場合test内でMyhonyahonyaの値を変更すると、呼び出した側のTargetの値も変更されてしまいますから、注意して(理解して)使わないと、呼び出した側に帰ってきたときにTargetを元に動作を決定しているようなことがあると、意図しない動作(今回の場合だとダブルクリックしたときのセルがTargetですが、test内でMyhonyahonyaを変更してたら別のセルがTargetになってしまいます）をまねくことにもなります。