Excelでパスワードなしで上書き保存するマクロ
パスワードが設定されているExcelファイルを開いた後、今後はパスワードを入力しなくても開くようにするには、名前を付けて保存を選択し、ツール - 全般オプション で読み取りパスワードを空欄にして保存します。
面倒なので、マクロを作りました。
読み取りパスワードと書き込みパスワードを空欄にして保存します。
Sub パスワードなしで上書き保存()
With ActiveWorkbook
.Password = ""
.WritePassword = ""
.Save
End With
End Sub
With ActiveWorkbook
.Password = ""
.WritePassword = ""
.Save
End With
End Sub
[ 2014年2月6日 | カテゴリー: Excel | タグ: VBA , パスワード ]
« PHPのpreg_match_allをJavaScriptで再現 | キリル文字をラテン文字に変換 »
[…] 以前、パスワードが設定されているExcelを開いた後、パスワードなしで上書き保存するマクロを紹介しましたが、今回はそのWord版です。 Excel2013で確認しました。 […]