⇒ こちらの記事をご覧ください。
今回は文書を閉じるWordマクロを取り上げます。
【第１】 単体の文書を閉じる。
単体の文書を閉じるときには、Documentオブジェクトに対してCloseメソッドを使います。
文書を開くOpenメソッドは、Documentsコレクションに対して使用したのですが、文書を閉じるCloseメソッドは、単体のDocumentオブジェクトに対して使用します。両者で方針が一貫していないようにも感じられますが、まぁそんなもんだと覚えてしまいましょう。
１ アクティブドキュメントを閉じる。
アクティブドキュメントとは、ユーザーの操作の対象となっている文書のことです。
そのマクロコードは、次のとおりとなります。
Sub 文書を閉じる１()
ActiveDocument.Close
End Sub
２ 文書名を指定して閉じる。
次のマクロは、「Hoge.docx」を閉じるプロシージャです。
Documentsプロパティの引数に文書名を指定すると、単体の文書を特定することができます。
マクロコードは、次のとおりとなります。
Sub 文書を閉じる２()
Documents("Hoge.docx").Close
End Sub
３ 〇番目に開いた文書を閉じる。
文書（Document）には開いた順番にインデックス番号が振られます。そして、そのインデックス番号を引数に指定すると「〇番目に開いた文書」という単体の文書が特定できます。
２番目に開いた文書を閉じるマクロコードは、次のとおりです。
Sub 文書を閉じる３()
Documents(2).Close
End Sub
【第２】 確認メッセージを表示させずに文書を閉じる。
文書に変更が加えらていると、閉じるときに保存確認メッセージが表示されます。
しかし、VBAを使うと、この確認メッセージを出さずに文書を閉じることができます。
確認メッセージを出さずに文書を閉じるには、Closeメソッドに引数「SaveCanges」を使います。
SaveCanges引数にTrueを入れると、変更された文書を自動的に保存して閉じます。
一方、SaveCanges引数にFalseを入れると、変更された文書を保存せずに閉じます。
上記いずれの場合も、保存確認メッセージは出ません。
１ 文書を保存して閉じる。
Sub 文書を閉じる４()
Documents("Hoge.docx").Close SaveChanges:= True
End Sub
２ 文書を保存しないで閉じる。
Sub 文書を閉じる５()
Documents("Hoge.docx").Close SaveChanges:= False
End Sub
 | Anker USB3.0 ウルトラスリム 4ポートハブ 【USB3.0高速ハブ / バスパワー/軽量/コンパクト】 |
| Amazon価格:￥1,399 | |
| Anker |
それでは、また次の記事で。
