EXCEL VBA op_hyouji

エクセル
FROG ふろっぐ
 
  • オプション

    本文印刷

    お気に入りに追加

  • 検索

    Googlewwwjp-ia
     

    Googlewwwjp-ia
     
  • 情報

  • 関連

[エクセル][EXCEL VBA op_hyouji]





Sub Macro()
'
'’■■表示■■
'
'’○表示

'’数式バー
Application.DisplayFormulaBar = False
Application.DisplayFormulaBar = True
'’ステータスバー
Application.DisplayStatusBar = False
Application.DisplayStatusBar = True
'’ウィンドウをタスクバーに表示
Application.ShowWindowsInTaskbar = False
Application.ShowWindowsInTaskbar = True
'
'’○コメント

'’なし
Application.DisplayCommentIndicator = 0
'’コメントマークのみ
Application.DisplayCommentIndicator = xlNoIndicator
'’コメントとコメントマーク
Application.DisplayCommentIndicator = xlCommentIndicatorOnly

'’○オブジェクト
'
'’すべて表示
ActiveWorkbook.DisplayDrawingObjects = xlAll
'’位置のみ表示
ActiveWorkbook.DisplayDrawingObjects = xlPlaceholders
'’すべて非表示
ActiveWorkbook.DisplayDrawingObjects = xlHide

'’○ウィンドウオプション
'
'’改ページ
ActiveSheet.DisplayAutomaticPageBreaks = True
ActiveSheet.DisplayAutomaticPageBreaks = False
'’行列番号
ActiveWindow.DisplayHeadings = False
ActiveWindow.DisplayHeadings = True
'’水平スクロールバー
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayHorizontalScrollBar = True
'’数式
ActiveWindow.DisplayFormulas = True
ActiveWindow.DisplayFormulas = False
'’アウトライン記号
ActiveWindow.DisplayOutline = False
ActiveWindow.DisplayOutline = True
'’垂直スクロールバー
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = True
'’枠線
ActiveWindow.DisplayGridlines = False
ActiveWindow.DisplayGridlines = True
'’ゼロ値
ActiveWindow.DisplayZeros = False
ActiveWindow.DisplayZeros = True
'’シート見出し
ActiveWindow.DisplayWorkbookTabs = False
ActiveWindow.DisplayWorkbookTabs = True
'’色
ActiveWindow.GridlineColorIndex = 3
ActiveWindow.GridlineColorIndex = xlAutomatic
End Sub





Production Japan Import Application. Since 1998