- Home ›
- Excel VBA入門 ›
- ウィンドウの参照
ウィンドウをアクティブにする
広告
指定したウィンドウをアクティブにします。アクティブになったウィンドウと言うのは、一番前面に表示されているウィンドウのことです。一度にアクティブにできるウィンドウは1つだけです。
ウィンドウをアクティブにするには、アクティブにしたいWindowオブジェクトに対して「Activate」メソッドを使います。
Dim window1 As Window Set window1 = Application.Windows("VBAsample.xls") window1.Activate
サンプルプログラム
では簡単なサンプルで試してみましょう。3つのブックを開いておきます。
この中から「2005年成績.xls」というウィンドウ名を持つWindowオブジェクトを取得し、アクティブな状態にしてみます。
Sub テスト() Dim window1 As Window Set window1 = Application.Windows("2005年成績.xls") window1.Activate End Sub
上記マクロを実行すると次のようになります。
( Written by Tatsuo Ikura )
Profile

著者 / TATSUO IKURA
初心者~中級者の方を対象としたプログラミング方法や開発環境の構築の解説を行うサイトの運営を行っています。