Word文書のパスワードをVBAで解除する方法【初心者向け解決ガイド】

こんにちは、皆さん。今日は、Word文書に設定されたパスワードを解除する方法についてお話しします。特に、パソコンやスマホの操作が苦手な45歳以上の方々にもわかりやすく説明していきますので、ご安心ください。

はじめにWord文書のパスワード保護とは？
VBAを使ってパスワードを解除する方法
注意点
よくある質問や疑問
1. Q1VBAエディタが開けません。どうすればいいですか？
2. Q2コードを実行してもパスワードが表示されません。どうすればいいですか？
今すぐ解決したい！どうしたらいい？
まとめ

はじめにWord文書のパスワード保護とは？

Wordのイメージ

まず、Word文書のパスワード保護について簡単にご説明します。Wordでは、文書を他人に見られたり編集されたりしないように、パスワードを設定することができます。しかし、いざ自分でそのパスワードを忘れてしまった場合、文書を開けなくなって困ってしまいますよね。

VBAを使ってパスワードを解除する方法

そんなときに役立つのが、VBA（Visual Basic for Applications）という機能です。これは、WordやExcelなどのMicrosoft Office製品に組み込まれているプログラミング言語で、さまざまな自動化や操作を行うことができます。今回は、このVBAを使って、パスワードを解除する方法をご紹介します。

ステップ1Word文書を開く

まず、パスワードを解除したいWord文書を開きます。このとき、パスワードの入力が求められますので、覚えている場合は入力してください。もし忘れてしまった場合は、次のステップに進みます。

ステップ2VBAエディタを起動する

Word文書を開いた状態で、キーボードの「Alt」キーと「F11」キーを同時に押します。すると、VBAエディタという画面が表示されます。

ステップ3新しいモジュールを挿入する

VBAエディタの上部メニューから「挿入」をクリックし、その中の「標準モジュール」を選択します。これで、新しいモジュールが作成されます。

ステップ4パスワード解除のコードを入力する

先ほど作成したモジュールに、以下のコードをコピーして貼り付けます。

vba

Sub PasswordBreaker()

    Dim i As Long

    i = 0

    Dim FileName As String

    Application.FileDialog(msoFileDialogOpen).Show

    FileName = Application.FileDialog(msoFileDialogOpen).SelectedItems(1)

    ScreenUpdating = False

Line2:

    On Error GoTo Line1

    Documents.Open FileName, , True, , i & ""

    MsgBox "Password is " & i

    Application.ScreenUpdating = True

    Exit Sub

Line1:

    i = i + 1

    Resume Line2

    ScreenUpdating = True

End Sub