ページコンテンツ
コントロール【スクロールバーの使い方】
最近立て続けで【その他のコントロール】について解説させていただいていますが、今回はデフォルトに用意されているコントロール【スクロールバー】について説明していきたいと思います。
スクロールバーとは
スクロールバーとは最小値・最大値を設定し、その全体の中に対する現在の値を直観的、視覚的に操作したいときに使えるコントロールです。
スクロールバーを設置する
スピンボタンに似たアイコンですが小さい方がスクロールバーコントロールです。
縦・横、長さ・幅は自由に設定ができます。
スクロールバーのプロパティ
スクロールバーには様々なプロパティが用意されており細かく設定が可能になっています。よく使うであろうものをご紹介していきます。
よく使うプロパティ
Max・Min
Max・Minはそれぞれ
- Max＝最大値
- Min＝最小値
を表しています、スクロールバーはこの設定のなかで数値を返します。値は（-2,147,483,648 ～ 2,147,483,647）の中で設定が可能です。
SmallChange・LargeChange
スクロールバーをスクロールさせる方法は二つあります、SmallChangeとLargeChangeです。
それぞれ赤丸の部分を押したときに変動する値を設定します。(例:SmallChangeの場合【→】を押したら10数値が増える等)
- 【SmallChange】＝スクロールバーの矢印を押したときに変動する値
- 【LargeChange】=スクロールバーのスクロール部をクリックしたときに変動する値
使用例
実際に使用する為に簡単なフォームを作ってみました。
Labelとスクロールバーだけの簡単なフォームです。スクロールバーの値をLabelに表示させてラベルのフォントサイズもその数値に合わせて変更するプログラムです。コードとファイルは下に用意しておきますのでご自由にお使いください。
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 | '矢印をクリックしたとき Private Sub ScrollBar1_Change() Label1.Caption = ScrollBar1.Value Label1.FontSize = ScrollBar1.Value End Sub 'スクロールバーをスライドさせたとき Private Sub ScrollBar1_Scroll() Label1.Caption = ScrollBar1.Value Label1.FontSize = ScrollBar1.Value End Sub Private Sub UserForm_Initialize() 'スクロールバーの最小値の設定 ScrollBar1.Min = 0 'スクロールバーの最大値の設定 ScrollBar1.Max = 100 'スライド時の値の設定 ScrollBar1.LargeChange = 10 '矢印をクリック時の値の設定 ScrollBar1.SmallChange = 5 End Sub |
ダウンロードはこちら
scrollbar 13.21 KB
ファイルやコードの利用について
サンプルコードなどは当サイトの免責事項をよくお読みになってからお使いください。Twitterフォロー
ブログの更新通知を受け取るにはこちらにはこちら↓Twitterもやってます(^^♪Excelについてはあまり触れませんがブログの更新のお知らせはツイートしています(^^♪
Twitterフォロー
Follow @takabou63Sponsored Link
国本温子,緑川吉行,できるシリーズ編集部 インプレス 2016-06-17
コメントを残す