Excelでパスワードなしで上書き保存するマクロ

Pocket

パスワードが設定されているExcelファイルを開いた後、今後はパスワードを入力しなくても開くようにするには、名前を付けて保存を選択し、ツール - 全般オプション で読み取りパスワードを空欄にして保存します。

面倒なので、マクロを作りました。
読み取りパスワードと書き込みパスワードを空欄にして保存します。

Sub パスワードなしで上書き保存()
    With ActiveWorkbook
        .Password = ""
        .WritePassword = ""
        .Save
    End With
End Sub

[ 2014年2月6日 | カテゴリー: Excel | タグ: , ]

« | »

コメント

  1. […] 以前、パスワードが設定されているExcelを開いた後、パスワードなしで上書き保存するマクロを紹介しましたが、今回はそのWord版です。 Excel2013で確認しました。 […]

コメントを残す

メールアドレスが公開されることはありません。 が付いている欄は必須項目です

送信してください。


タグ

カテゴリー

最近の投稿

最近のコメント

固定ページ

アーカイブ

stabucky

写真

メタ情報