Microsoft Excel2000
　ファイル(F) 　編集(E) 　表示(V) 　挿入(I) 　書式(O) 　ツ−ル(T) 　デ−タ(D) 　ウィンドウ(W) 　ヘルプ(H) 　その他(S) 　TOP
標準(N)
改ペ−ジプレビュ−(P)
ツ−ルバ−(Ｔ)　　　　　　≫
数式バ−(F)
ステ−タスバ−(S)
ヘッダ−とフッタ−(H)
コメント(C)　　
ユ−ザ−設定のビュ−(V)
全画面表示(U)
ズ−ム(Z)

V1．標準

●「標準」のマクロ例
Sub Macro1()
    ActiveWindow.View = xlNormalView
End Sub
■本例は、「改ペ−ジプレビュ−」画面から標準画面に戻したケ−ス。
PageTop
V2．改ペ−ジプレビュ−

●「改ペ−ジプレビュ−」のマクロ例
Sub Macro1()
    ActiveWindow.View = xlPageBreakPreview
End Sub
■改ペ−ジプレビュ−を表示し印刷範囲境界線を変更が出来る。
PageTop
V3．ツ−ルバ−
標準 書式設定 Visual Basis Web
グラフ クリックボ−ド コントロ−ルツ−ルボックス チェック/コメント
. ピポットテ−ブル フォ−ム ワ−ドア−ト
外部デ−タ 図 図形描画 ユ−ザ−設定（Ｃ）

■　ツ−ルバ−は、2007にはなさそう（後で再チェック）
PageTop
V4．数式バ−

●「数式バ−」のマクロ例
Sub Macro1()
      Application.DisplayFormulaBar = True
End Sub
PageTop
V5．ステ−タスバ−
■　ステ−タスバ−は、2007にはなさそう（後で再チェック）
PageTop
V6．ヘッダ−とフッタ−
 
●「ヘッダ−とフッタ−」のマクロ例
Sub Macro1()
 ActiveSheet.PageSetup.PrintArea = ""
    With ActiveSheet.PageSetup
        .LeftHeader = ""
        .CenterHeader = "&A"

        .RightHeader = ""
        .LeftFooter = ""
        .CenterFooter = "&P"
        .RightFooter = ""
    End With
End Sub
■本例は、印刷時のヘッダ−とフッタ−状態を指定。
PageTop
V7．コメント

●「コメント」のマクロ例
コメントを表示
Sub Macro1()
   Application.DisplayCommentIndicator = xlCommentAndIndicator
End Sub
コメントを非表示
Sub Macro1()
  Application.DisplayCommentIndicator = xlCommentIndicatorOnly
End Sub
■　設定されているコメントを表示/非表示。
PageTop
V8．ユ−ザ−設定のビュ−

●「ユ−ザ−設定のビュ−」のマクロ例
Sub Macro2()
    ActiveWorkbook.CustomViews("表a").Show
    Range("B30").Select
End Sub
■本例は、ユ−ザ−設定のビュ−ダイアログから"表a"を指定し表示したケ−ス。
PageTop
V9．全画面表示

●「全画面表示」のマクロ例
Sub Macro1()
    Application.DisplayFullScreen = True
End Sub
■　"DisplayFullScreen = False"で元の画面に戻る。
PageTop
V10．ズ−ム

●「ズ−ム」のマクロ例
Sub Macro1()
     ActiveWindow.Zoom = 75
End Sub
PageTop

TOP