Excel VBAで、ユーザーフォームのスクロールボックスの移動ピッチを細かくしたい

質問

VBA初心者です。
ユーザーフォームに配置したスクロールバー内のスクロールボックスを、マウスでドラッグした時の移動ピッチを細かくすることは可能でしょうか？両側のスクロール矢印ボタンを押したときの移動ピッチは、設定可能ですが・・・
よろしくお願いします。

回答No.1

temtecomai2 · ベストアンサー

ドラッグ中ですか？
ドラッグを終えた時の移動後の位置ですか？

結局、ボックスが止まる位置はプロパティの Min と Max の値によって変わります。
Min が 0 で、Max が 5 ならボックスは 6箇所しか止まりません。

ドラッグ中にボックスが視覚的に移動する解像度についてはわかりません。
というかマウスの移動解像度にも影響されるので意味無いでしょう。
操作する人の忍耐力も必要でしょうから。

お礼

お返事ありがとうございます。
例えば、ラベル１とスクロールバー１を配置し、スクロールバーの設定を、Max=1000、Min=0、Width＝100として以下のように記述した場合、ドラッグ中のValueは11づつ増えるようです。

Private Sub ScrollBar1_Scroll()
Label1.Caption = ScrollBar1.Value
End Sub

Max、Min、Widthの設定を変えずに、ドラッグ中のValueを、もっと細かく変動させたいのですが、可能でしょうか？

回答No.2

BIGT

SmallChangeプロパティで変更可能です(Excel2000でチェック)。

お礼

お返事ありがとうございました。アドバイスを参考に記述してみます。