Excel VBA 初心者の為の入門講座のホームページです

Excel VBA 入門講座

2.ワークブックを開く

ワークブックを開くにはOpenメソッドを使用します。

メソッド引数定数内容

Open Filename -- 開くブックのファイル名

Password -- 読み取りのパスワードを指定

WriteResPassword -- 書き込みパスワードを指定

ReadOnly True ブックを読み取り専用モードで開く

False ブックを読み取り専用モードで開かない


'"c:\test.xls"に保存されているワークブックを開く
Sub OpenWorkbook()
     Workbooks.Open Filename := "c:\test.xls"
End Sub

'パスワード保護されたブックを開く
Sub OpenWorkbook()
     Workbooks.Open FileName:="c:\test.xls" , Password:="AAAABBBB"
End Sub

'書き込み保護されたブックを開く
Sub OpenWorkbook()
     Workbooks.Open FileName:="c:\test.xls" , _
                           WriteResPassword:="CCCCDDDD"
End Sub

'ブックを読み取り専用モードで開く
Sub OpenWorkbook()
     Workbooks.Open FileName:="c:\test.xls" , ReadOnly:=True
End Sub

組み込みダイアログボックスによりブックを開くにはDialogsオブジェクトを使用します。


'組み込みダイアログ ボックスによりブックを開く
Application.Dialogs(xlDialogOpen).Show