パスワードで保護されたExcelファイルのロックを解除する方法｜誰でもできる2つの簡単な手順

本記事では、売上概要がまとめられた以下のExcelシートを例に、ファイルの復号化（保護解除）の手順をわかりやすく解説します。

このシートのセルを編集しようとすると、警告ダイアログが表示され、編集できなくなっています。

シートが保護されているか確認する方法

まず、リボンの「校閲」タブを開きます。「保護」グループ内の表示を見ると、シートが保護されていることが確認できます。

「シート保護の解除」をクリックすると、「シート保護の解除」ダイアログボックスが表示され、ここでパスワードの入力を求められます。本記事では、パスワードが分からない状態でもExcelファイルを復号化する2つの方法を紹介します。

※なお、これらの方法は自分で作成したファイルや、権限を持っているファイルに対してのみ使用してください。

方法1：ZIP拡張子を利用してパスワードなしでExcelファイルを復号化する

同じく保護されたシートを使って、手順を説明していきます。

手順：

• 下の画像のように、ファイル拡張子が表示されていない場合は、まず拡張子を表示させます。

• エクスプローラーの「表示」タブを開きます。
• 「ファイル名拡張子」にチェックを入れます。

• ファイルの拡張子を「zip」に変更します。
• Enterキーを押します。

• 変更の確認を求める警告ダイアログが表示されるので、「はい」を選択します。

• 拡張子がzipに変わったことを確認できます。

• ファイルを選択して右クリックします。
• 「Decrypting Excel Fileに展開」を選択します。

• 新しいフォルダが作成されるので、そのフォルダを開きます。

• 「xl」という名前のフォルダを開きます。

• 続いて「worksheets」フォルダを開きます。

• Excelファイル内のすべてのワークシートが表示されます。今回はsheet3の保護を解除します。

• sheet3を右クリックします。
• 「プログラムから開く」を選択します。
• 「ワードパッド」を選びます。

• 文書内で、下の画像のハイライト部分のように「<sheetProtection」で始まる箇所を探します。
• その部分を削除します。
• Ctrl + Sキーでファイルを保存します。

• すべてのフォルダとファイルを選択します。
• 右クリックして「送る」を選択します。
• 「圧縮（zip形式）フォルダー」を選びます。

• 任意の名前を付けてファイルを作成します。

• zipファイルが作成されたことを確認できます。

• ファイルの拡張子を「xlsm」に変更します。
• Enterキーを押します。

• 警告ダイアログが表示されたら、「はい」を選択します。

• 目的のExcelファイルが完成しました。
• ファイルを開いて、復号化されているか確認しましょう。

• このように、パスワードなしでExcelファイルの保護を解除できました。

方法2：マクロを使ってパスワードなしでExcelファイルを復号化する

こちらも同じシートを使って手順を説明します。

手順：

• 「開発」タブを開きます。
• 「Visual Basic」を選択します。

• Visual Basicエディターの画面が開いたら、「挿入」タブを選択します。
• 「標準モジュール」を選びます。

• モジュール画面が開くので、以下のコードをコピーして貼り付けます。

Sub Decrypt_File()
Dim p As Integer, q As Integer, r As Integer
Dim a As Integer, b As Integer, c As Integer
Dim p1 As Integer, p2 As Integer, p3 As Integer
Dim p4 As Integer, p5 As Integer, p6 As Integer
On Error Resume Next
For p = 65 To 66: For q = 65 To 66: For r = 65 To 66
For a = 65 To 66: For b = 65 To 66: For p1 = 65 To 66
For p2 = 65 To 66: For p3 = 65 To 66: For p4 = 65 To 66
For p5 = 65 To 66: For p6 = 65 To 66: For c = 32 To 126
ActiveSheet.Unprotect Chr(p) & Chr(q) & Chr(r) & Chr(a) & Chr(b) _
& Chr(p1) & Chr(p2) & Chr(p3) & Chr(p4) & Chr(p5) & Chr(p6) & Chr(c)
If ActiveSheet.ProtectContents = False Then
MsgBox "Done!"
Exit Sub
End If
Next: Next: Next: Next: Next: Next:
Next: Next: Next: Next: Next: Next:
End Sub

コードの仕組み

• 12個のFor Nextループを使って、文字の組み合わせを順番に試していきます。
• ActiveSheet.Unprotectメソッドにより、アクティブなシートの保護を解除します。
• Chr関数は、ASCIIコードに対応する文字を取得する関数です。
• ActiveSheet.ProtectContentsプロパティで、ワークシートがまだ保護されているかどうかを判定します。Falseになれば、「Done!（完了）」というメッセージボックスが表示されます。

• コードを保存して、ワークシートに戻ります。

• 再び「開発」タブを開きます。
• 「マクロ」を選択します。

• マクロダイアログボックスが表示されるので、マクロ名として「Decrypt_File」を選択します。
• 「実行」をクリックします。

• メッセージボックスが表示されたら、「OK」を選択します。

• これでExcelシートから保護が解除されました。実際に編集して確認してみましょう。
• 塗りつぶしの色を適用したい範囲を選択します。
• 「ホーム」タブを開きます。
• 「塗りつぶしの色」のドロップダウンをクリックします。

• 好きな色を選択します。

• 選択した範囲に塗りつぶしの色が適用されました。つまり、パスワードなしでファイルの復号化に成功したということです。

関連記事：Excelでセルの内容を暗号化する方法

パスワードが分かっている場合のExcelファイルの復号化方法

パスワードを知っている場合は、もっと簡単に保護を解除できます。

手順：

• ファイルを開くと、パスワード入力のダイアログボックスが表示されます。
• ダイアログボックスにパスワードを入力します。
• 「OK」を押します。

• これでExcelファイルが復号化されました。次に、パスワード自体を削除します。「ファイル」タブを開きます。

• 「情報」を選択します。

• 「ブックの保護」のドロップダウンメニューをクリックします。
• 「パスワードを使用して暗号化」を選びます。

• ダイアログボックスが表示されるので、パスワード欄を空にします。
• 「OK」を選択します。

• これでExcelファイルから保護が完全に削除されました。

注意点

• 方法2で複数のシートの保護を解除したい場合は、シートごとに個別にコードを実行する必要があります。また、処理に時間がかかる場合がある点にもご注意ください。

練習用シート

パスワード付きExcelファイルの復号化を練習できるように、練習用ワークシートをご用意しました。

練習用ワークブックのダウンロードはこちら

関連記事

• 【解決済み】暗号化されたExcelファイルが開けないときの対処法
• Excelから暗号化を削除する方法

<< Excelの暗号化に戻る | Excelの保護 | Excelを学ぶ

無料の高度なExcel演習問題と解答をゲットしよう！