ファイルを開く Workbooks.Openメソッド



オブジェクト内容など
Workbooks.Open(FileName , UpdateLinks, ReadOnly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMru, Local, CorruptLoad )

ワークブックを開くWorkbookオブジェクトのメソッドです。
引数を指定することで読取り専用で開いたり、書き込みパスワードを解除して開くことができます。

引数はFileName,ReadOnly,UpdateLinksあたりをおさえておけば基本的には大丈夫だと思います。(エクセルファイルのみ扱う場合)
名前 説明 備考
FileName ファイルパス+ファイル名 String 必須
UpdateLinks リンク更新方法
(ユーザー任意,しない,する)

1 or 0 or 3
既定:
1
ReadOnly 読み取り専用かどうか True or False 既定:
False
Format txt.ファイルの場合の区切り文字
(タブ,コンマ,スペース,セミコロン,なし)
1 or 2 or 3 or 4 or 5 既定:
現在値
Password 読み取りパスワードがある場合に入力可能 任意のパスワード 既定:
省略
WriteResPassword 書き込みパスワードある場合に入力可能 任意のパスワード 既定:
省略
IgnoreReadOnly
Recommended
読み取り専用推奨時にメッセージを出さなくするか True or False 既定:
False
Origin txtファイルの場合、元のOS xlWindowsなど 既定:
使用OS
Delimiter 引数 Format が 6 の場合の区切り文字(タブ,コンマ,セミコロン) Chr(9) or "," or ";"
Editable Excel 4.0 のアドインの場合 True or False 既定:
False
Notify 誰かがファイル開いてる場合の通知 True or False 既定:
False
Converter ファイル コンバータのインデックス番号? ??? 既定:
???
AddToMru 最近使用したファイルの一覧にブックを追加 True or False 既定:
False
Local Excel の言語設定に合わせて保存する True or False 既定:
False
CorruptLoad 読み込み処理? xlNormalLoad,
xlRepairFile,
xlExtractData
既定:
省略
引数一覧


サンプルコード
Sub SampleOpen1()
    '[C:\]にある[TestFile.xls]を読み取り専用で、外部リンクを更新しないで開く
    Workbooks.Open "C:\TestFile.xls", ReadOnly:=True, UpdateLinks:=0

End Sub

関連ページ
実行時エラー '1004':'Open'メソッドは失敗しました