リストボックスのスクロールバーをマウスで動かしたい

質問

エクセル２００７です。

Sheet1のA列に
1行目から順に
1
2
3
4
5
6
7
8
9
10
といれました。

ユーザーフォームを新規作成し、リストボックスを設置しました。

VBAコードは、
Private Sub UserForm_Initialize()
Me.ListBox1.RowSource = "Sheet1!a1:a10"
End Sub

にしました。

VBE画面でF5を押して、フォームを表示させるとリストボックスにスクロールバーが表示されますが、
フォームをクリックして、マウスホイールでぐりぐりしても、リストは動きません。

画像のように、４にカーソルをあて、グリグリしてもダメです。

どうしたら動くようになるのでしょうか？

回答No.1

masatsan · ベストアンサー

はずしていたらごめんなさい。
ＥＸＣＥＬの仕様でリストボックスはホイールが使えないと記憶しています。
ホイールを使用できるようにするには、ホイールのイベントをフックするようなWindowsAPIを使うしかないのでは？

お礼

元々使えない仕様なのですか。知りませんでした。
APIは難しそうですが勉強してみます。