エクセルシート内で、読み取り専用で参照したいファイルを開くVBAを紹介します。
申請フォームなどをボタンで呼び出す際や、参考データを示したいときに活用できます。
読み取り専用でファイルを開くVBA(コピペ可)
1 2 3 | Sub OpenWorkbook_readonly() Workbooks.Open Filename:="D:\test_file\test_data.xlsx", ReadOnly:=True End Sub |
これを適用したいシートまたは標準モジュールに加えるだけです。
ボタンの追加方法はこちら。
ファイルのパスは下図範囲を書き換えてください。
呼び出したいファイル名称は下図の範囲に記載してください。
あとはボタンを作成してマクロを登録するだけで、読み取り専用ファイルを呼び出すことができます。
コメント