ブックを開く

既に作成されているブックを開くにはWorkbooksコレクションの「Open」メソッドを使います。

Workbooks.Open Filename:="C:¥ブック名.xls"

「Filename」引数で開きたいブックを指定します。パスを指定しない場合にはカレントディレクトリにあるブックを検索します。

他、いくつかの引数が指定可能です。使いそうなものだけ抜粋して紹介します。

「UpdateLinks」引数にはファイル内のリンクの更新方法を指定します。リンクが設定されているファイルを開くとき、この引数を省略すると、リンク更新のダイアログ ボックスが表示されます。次のいずれかの値を指定します。

値	リンク方法
0	外部参照とリモート参照は共に更新されません。
1	外部参照は更新され、リモート参照は更新されません。
2	リモート参照は更新され、外部参照は更新されません。
3	外部参照とリモート参照は共に更新されます。

「ReadOnly」引数は、ブックを読み取り専用モードで開くには、True を指定します。

「Password」引数は、読み取りパスワードが設定されたブックを開くのに必要なパスワードを指定します。パスワードが必要なときにこの引数を省略すると、パスワードの入力を促すダイアログ ボックスが表示されます。

「WriteResPassword 」引数は、書き込みパスワードが設定されたブックを開くのに必要なパスワードを指定します。パスワードが必要なときにこの引数を省略すると、パスワードの入力を促すダイアログ ボックスが表示されます。

サンプルプログラム

では簡単なサンプルで試してみましょう。

testbooknew2.bas

Sub テスト()
    
    Workbooks.Open Filename:="C:¥excelsample¥2005年成績.xls"
    Workbooks.Open Filename:="C:¥excelsample¥2006年成績.xls"
    
End Sub

上記マクロを実行すると次のようになります。

2枚のブックを開く事が出来ました。

OfficePro