Word VBAで文書を自動的に閉じる方法：初心者向け解説

2025.06.272026.01.27

こんにちは！今日は、Microsoft WordのVBA（Visual Basic for Applications）を使って、文書を自動的に閉じる方法についてお話しします。パソコンやスマホの操作に不安がある方でも、安心して学べるように、わかりやすく説明しますね。

Word VBAで文書を閉じる基本の方法
複数の文書を一度に閉じる方法
ExcelからWordを操作して文書を閉じる方法
よくある質問や疑問
まとめ

Word VBAで文書を閉じる基本の方法

Wordのイメージ

まずは、最も基本的な方法からご紹介します。以下のコードをVBAエディタに入力してみてください。

ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges

このコードは、現在開いている文書を保存せずに閉じるものです。もし、変更を保存したい場合は、`wdSaveChanges`を使用します。

複数の文書を一度に閉じる方法

次に、複数の文書を一度に閉じる方法をご紹介します。以下のコードをVBAエディタに入力してみてください。

Sub CloseAllDocuments()

    Dim doc As Document

    For Each doc In Documents

        doc.Close SaveChanges:=wdDoNotSaveChanges

    Next doc

End Sub

このコードは、開いているすべての文書を保存せずに閉じるものです。特定の文書だけを閉じたい場合は、`If`文を使って条件を追加します。

ExcelからWordを操作して文書を閉じる方法

ExcelのVBAからWordを操作して文書を閉じる方法もあります。以下のコードをExcelのVBAエディタに入力してみてください。

Sub CloseWordDocument()

    Dim wdApp As Object

    On Error Resume Next

    Set wdApp = GetObject(, "Word.Application")

    On Error GoTo 0

    If Not wdApp Is Nothing Then

        wdApp.Documents("YourDocumentName.docx").Close SaveChanges:=wdDoNotSaveChanges

        wdApp.Quit

    End If

End Sub

このコードは、指定した名前のWord文書を閉じ、Wordアプリケーションを終了するものです。`YourDocumentName.docx`の部分を閉じたい文書の名前に変更してください。

よくある質問や疑問

Q1: 保存せずに文書を閉じると、データが失われませんか？

はい、保存せずに閉じると、変更内容は失われます。重要な変更がある場合は、必ず保存してから閉じるようにしましょう。

Q2: VBAエディタの開き方がわかりません。

Wordを開き、「Alt」キーと「F11」キーを同時に押すと、VBAエディタが開きます。そこにコードを入力してください。

Q3: 複数の文書を閉じる際、特定の文書だけを閉じる方法はありますか？

はい、`If`文を使って条件を追加することで、特定の文書だけを閉じることができます。例えば、文書名が「Report.docx」の場合、`If ActiveDocument.Name = “Report.docx” Then`と記述します。

まとめ

今回は、Word VBAを使って文書を自動的に閉じる方法についてご紹介しました。初心者の方でも安心して試せる内容になっていますので、ぜひ実践してみてくださいね。

他にも疑問やお悩み事があれば、お気軽にLINEからお声掛けください。お手伝いできることがあれば、喜んでサポートいたします！