ウィンドウの位置を入れ替える（ActivatePrevious メソッド、ActivateNext メソッド）
2016/01/12
ウィンドウの位置を入れ替える
ActivatePrevious メソッド、ActivateNext メソッドを使用すると現在のウィンドウ位置を変更することが可能です。
ActivatePrevious メソッド
まず、指定したウィンドウをアクテイブにし、次にその時一番後ろにウィンドウをアクティブにします。
object.ActivatePrevious
引数・戻り値
- object ・・・ 対象となる Window オブジェクトを指定します。
ActivateNext メソッド
まず、指定したウィンドウをアクテイブにし、次にそのウィンドウを一番後ろに移動します。
object.ActivateNext
引数・戻り値
- object ・・・ 対象となる Window オブジェクトを指定します。
ActivatePrevious メソッド・ActivateNext メソッド 使用例
サンプルVBAソース 1
|
1 2 3 4 5 6 7 8 9 |
Sub Sample_ActivatePrevious() 'まず「2番目のウィンドウ」をアクテイブにし、 '次に「一番後ろのウィンドウ」をアクティブにする Windows(2).ActivatePrevious End Sub |
サンプルVBAソース 1 実行結果
実行前 （「Book1」「Book2」「Book3」）
実行後（「Book3」「Book2」「Book1」）
サンプルVBAソース 2
|
1 2 3 4 5 6 7 8 |
Sub Sample_ActivateNext() 'アクティブウィンドウを一番後ろにする ActiveWindow.ActivateNext End Sub |
サンプルVBAソース 2 実行結果
実行前 （「Book2」「Book1」「Book3」）
実行後（「Book1」「Book3」「Book2」）
関連記事
-
-
ブックを別名で保存（SaveAs メソッド）
ブックを別名で保存（SaveAs メソッド） ブックの変更を保存したり、新規ブッ …
-
-
印刷設定（偶数ページのヘッダー・フッターを設定）OddAndEvenPagesHeaderFooter, EvenPage
偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …
-
-
アクティブシートを参照する（ActiveSheet プロパティ）
アクティブなワークシートを参照する ActiveSheet プロパティを使用する …
-
-
指定したセル範囲が含まれるワークシートを参照する（Worksheet プロパティ）
Worksheet プロパティ Worksheet プロパティは、指定したセル範 …
-
-
シート見出しの色を設定（Tab プロパティ）
シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …
-
-
ワークシートの非表示・再表示（Visible プロパティ）
ワークシートの表示・非表示 ワークシートを非表示にしたり、非表示にしたワークシー …
-
-
スクロールバーの表示・非表示（DisplayHorizontalScrollBar,DisplayVerticalScrollBar）
スクロールバーの表示・非表示の設定 Windows オブジェクト の Displ …
-
-
並べて比較（CompareSideBySideWith,SyncScrollingSideBySide,BreakSideBySide）
並べて比較（CompareSideBySideWith メソッド） Compar …
-
-
ウィンドウの分割（Split プロパティ,SplitColumn プロパティ,SplitRow プロパティ）
ウィンドウの分割と解除 ウィンドウ（ワークシート画面）を分割するには、Split …
-
-
イベントの発生・無効をコントロール（EnableEvents プロパティ）
EnableEvents プロパティ EnableEvents プロパティに T …