ワークブックを開く場合は次のように行います。
指定のディレクトリにあるファイルを開く
Sub Test() Workbooks.Open Filename:="c:\test.xls" End Sub
パスワードを指定してファイルを開く
Sub Test() Workbooks.Open Filename:="c:\test.xls", Password:="AAABBB" End Sub
書き込み保護されたファイルを開く
Sub Test() Workbooks.Open Filename:="c:\test.xls", _ WriteResPassword:="CCCCDDDD" End Sub
読み取り専用でファイルを開く
Sub Test() Workbooks.Open Filename:="c:\test.xls", ReadOnly:=True End Sub
ダイアログより開くファイルを指定する
Sub Test() Application.Dialogs(xlDialogOpen).Show End Sub