ウィンドウの位置を入れ替える（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」）
関連記事
-
-
ユーザー設定のドキュメントプロパティ（CustomDocumentProperties プロパティ）
CustomDocumentProperties プロパティ ユーザー設定のドキ …
-
-
ワークシートのコピー・移動（Copy メソッド Move メソッド）
Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …
-
-
ファイル保存の既定の形式を取得・設定（DefaultSaveFormat プロパティ）
DefaultSaveFormat プロパティ DefaultSaveForma …
-
-
印刷実行前に総ページ数を取得（ExecuteExcel4Macro メソッド）
印刷の総ページ数を取得（ExecuteExcel4Macro メソッド） Exc …
-
-
印刷設定（ヘッダー・フッターに画像を設定）Graphic オブジェクト
Graphic オブジェクト Graphic オブジェクト は、ヘッダーおよびフ …
-
-
ページ数に合わせて印刷（FitToPagesTall, FitToPagesWide）
PageSetup.FitToPagesTall プロパティ PageSetup …
-
-
ブックを開く（Open メソッド）
ブックを開く（Open メソッド） ブックを開くには、Workbooks コレク …
-
-
印刷時の改ページ設定（Add,ResetAllPageBreaks）
改ページの追加と解除 印刷時に改ページを指定するには、HPageBreaks コ …
-
-
ワークシートを参照する（Sheets プロパティ）
Sheets プロパティ Sheets プロパティは、Sheets コレクション …
-
-
印刷の倍率（拡大／縮小）（PageSetup.Zoom プロパティ）
PageSetup.Zoom プロパティ PageSetup.Zoom プロパテ …