VBA～パスワード付ブックを開こう～Excel

VBAでパスワード付ブックを開きたい場合はWorkbooks.Openメソッドで読み取りパスワードの場合は引数Passwordを設定し、書き込みパスワードの場合は引数WriteResPasswordを設定します。

読み取りパスワード付ブックを開く

下のコードを実行すると読み取りパスワード付ブックが開きます。

Sub test1()

Workbooks.Open "C:\Users\eccen\Desktop\001\home\excel\2000-確認未\0001すぐできそう\0852-VBA-パスワードありブックを開く-Excel\読み取りパス付ブック.xlsx",
Password:="office"

End Sub

書き込みパスワード付ブックを開く

下のコードを実行すると書き込みパスワード付ブックが開きます。

Sub test2()

Workbooks.Open "C:\Users\eccen\Desktop\001\home\excel\2000-確認未\0001すぐできそう\0852-VBA-パスワードありブックを開く-Excel\書き込みパス付ブック.xlsx",
WriteResPassword:="office"

End Sub