コンボボックス ▼ボタンをクリックしたらイベント

コンボボックスのクリックイベントについて。
コンボボックスの▼ボタンをクリックしたらイベントを発生させたいのですが

Private Sub コンボ0_Click()
MsgBox ""
End Sub

として、▼ボタンを押しても無反応です。
どうやらClickイベントは値が入力されたら発生するようですが
値を入力する前に、▼ボタンでプルダウンで値を入力しようとしたとき位
発生させるにはどうすればいいでしょう？

GotFocusイベントだと、▼ボタン以外の部分に触れてもイベントが発生してしまいます。

No.2 ベストアンサー 回答者： DreamyCat 回答日時： 2013/10/24 16:02

Private Sub ComboBox1_DropButtonClick()

があります。
listが開くのでそのどれかを選択すればうまくいきますが
listを選ばないと２回呼び出されてしまいます。

この回答へのお礼

どうもありがとうございました。

お礼日時：2013/11/13 22:23

No.1 回答者： f_a_007 回答日時： 2013/10/23 22:57

Private Sub コンボ2_MouseDown(Button As Integer,・・・ Y As Single)

MsgBox X & ":" & Y
End Sub

で、XとYとの値を調べれば、▼ボタンが押されたかどうかは判定できます。

この回答へのお礼

どうもありがとうございました。

お礼日時：2013/11/13 22:23