Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

スクロールバーの表示・非表示（DisplayHorizontalScrollBar,DisplayVerticalScrollBar）

2016/06/07

スクロールバーの表示・非表示の設定

Windows オブジェクト の DisplayHorizontalScrollBar プロパティ で、水平スクロールバー、DisplayVerticalScrollBar プロパティ で、垂直スクロールバーの表示・非表示の設定および現在の状態を取得します。
また、Application オブジェクト の DisplayScrollBars プロパティ で、すべてのブックのスクロールバーの表示・非表示の設定および現在の状態を取得します。

DisplayHorizontalScrollBar プロパティ

【書式】

＜取得＞
object.DisplayHorizontalScrollBar

＜設定＞
object.DisplayHorizontalScrollBar = boolean

引数・戻り値

object ・・・対象となる Window オブジェクトを指定します。
boolean ・・・ブール型（Boolean）の値を指定します。True を指定すると水平スクロールバーが表示され、False を指定すると非表示になります。

DisplayVerticalScrollBar プロパティ

【書式】

＜取得＞
object.DisplayVerticalScrollBar

＜設定＞
object.DisplayVerticalScrollBar = boolean

引数・戻り値

object ・・・対象となる Window オブジェクトを指定します。
boolean ・・・ブール型（Boolean）の値を指定します。True を指定すると垂直スクロールバーが表示され、False を指定すると非表示になります。

DisplayScrollBars プロパティ

【書式】

＜取得＞
object.DisplayScrollBars

＜設定＞
object.DisplayScrollBars = boolean

引数・戻り値

object ・・・対象となる Application オブジェクトを指定します。
boolean ・・・ブール型（Boolean）の値を指定します。True を指定するとすべてのブックのスクロールバーが表示され、False を指定すると非表示になります。

スクロールバーの表示・非表示使用例

サンプルVBAソース 1

　
Sub Sample1_DisplayScrollBars()
    
    'すべてのブックの行と列の見出しを非表示にする
    Application.DisplayScrollBars = False
    
End Sub

1

2

3

4

5

6

7

8

　

Sub Sample1_DisplayScrollBars()

'すべてのブックの行と列の見出しを非表示にする

Application.DisplayScrollBars = False

End Sub

　

実行結果

サンプルVBAソース 2

　
Sub Sample2_DisplayScrollBars()
    
    'アクティブウィンドウの垂直スクロールバーを表示、
    '水平スクロールバーを非表示にする
    ActiveWindow.DisplayHorizontalScrollBar = False
    ActiveWindow.DisplayVerticalScrollBar = True
    
End Sub

1

2

3

4

5

6

7

8

9

10

　

Sub Sample2_DisplayScrollBars()

'アクティブウィンドウの垂直スクロールバーを表示、

'水平スクロールバーを非表示にする

ActiveWindow.DisplayHorizontalScrollBar = False

ActiveWindow.DisplayVerticalScrollBar = True

End Sub

　

実行結果

- ブック・シートの操作 Application オブジェクト, DisplayHorizontalScrollBar プロパティ, DisplayScrollBars プロパティ, DisplayVerticalScrollBar プロパティ, VBA基本, Window オブジェクト, エクセルVBA, ブック・シートの操作

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 印刷設定（偶数ページのヘッダー・フッターを設定）OddAndEvenPagesHeaderFooter, EvenPage

偶数ページに別のヘッダーおよびフッターを設定偶数ページのヘッダーおよびフッター …

: ブックを別名で保存（SaveAs メソッド）

ブックを別名で保存（SaveAs メソッド）ブックの変更を保存したり、新規ブッ …

: 印刷設定（フッターに画像を指定）LeftFooterPicture,CenterFooterPicture,RightFooterPicture

フッターに画像を表示するには LeftFooterPicture プロパティ、C …

: ブックを閉じる（Close メソッド）

ブックを閉じる（Close メソッド） Close メソッドで、ブックを閉じる …

: アクティブシートを参照する（ActiveSheet プロパティ）

アクティブなワークシートを参照する ActiveSheet プロパティを使用する …

: 印刷の先頭のページ番号を設定（PageSetup.FirstPageNumber プロパティ）

PageSetup.FirstPageNumber プロパティ PageSetu …

: ウィンドウの状態を取得・設定（WindowState プロパティ）

ウィンドウの状態を取得・設定（WindowState プロパティ） Window …

: 印刷：余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin

余白を設定する余白を設定する単位は、pt（ポイント：約 0.03528 cm） …

: 白黒印刷（PageSetup.BlackAndWhite プロパティ）

PageSetup.BlackAndWhite プロパティ PageSetup. …

: 選択されているシートを参照する（SelectedSheets プロパティ）

SelectedSheets プロパティ選択されているすべてのシートをあらわす …

PREV: ステータスバーにメッセージを表示（StatusBar プロパティ）
NEXT: ウィンドウを拡大・縮小（Zoom プロパティ）