Microsoft Excel VBA - テキストボックスにスクロールバーを表示する方法
◆概要
このページは、Excel VBAでテキストボックスにスクロールバーを表示する方法について記載しています。
MuletiLineプロパティに"True"を設定すると複数行の変種が行えますが、ScrollBars プロパティを使うことでテキストボックスコントロールにスクロールバーを設定することができます。プロパティの値は定数で設定し、水平および垂直両方のスクロールバーを表示させることができます。
◆Sample code
次のコードを実行すると、テキストボックスに水平スクロールバーと垂直スクロールバーを設定します。
Sub SettingTextBoxScrollBars() Worksheets("Sheet1").TextBox1.ScrollBars = fmScrollBarsBoth End Sub |
ScrollBarsの定数一覧
| 定数 | 値 | 説明 |
fmScrollBarsNone |
0 | スクロールバーを表示しない（規定値） |
fmScrollBarsHorizontal |
1 | 水平スクロールバーを表示する |
fmScrollBarsVertical |
2 | 垂直スクロールバーを表示する |
fmScrollBarsBoth |
3 | 水平／垂直スクロールバーの両方を表示する |
▼ページトップへ