BuiltinDocumentPropertiesプロパティ解説(Excel VBA)

Excel VBAの「BuiltinDocumentProperties」プロパティについて

Excel VBAでは、「BuiltinDocumentProperties」プロパティを使用して、ワークブックの組み込みドキュメントプロパティにアクセスすることができます。組み込みドキュメントプロパティとは、タイトル、著者、作成日など、ドキュメントに関する基本情報を含んだプロパティのことを指します。

サンプルコード1: 組み込みドキュメントプロパティの取得

ここでは、タイトル（Title）と著者（Author）のプロパティを取得して表示します。

Sub ShowSpecificDocumentProperties()
    Dim title As String
    Dim author As String

    On Error Resume Next
    title = ActiveWorkbook.BuiltinDocumentProperties("Title").Value
    author = ActiveWorkbook.BuiltinDocumentProperties("Author").Value
    On Error GoTo 0

    If title <> "" Then
        MsgBox "Title: " & title
    Else
        MsgBox "Title property does not exist or cannot be accessed"
    End If

    If author <> "" Then
        MsgBox "Author: " & author
    Else
        MsgBox "Author property does not exist or cannot be accessed"
    End If
End Sub

このコードでは、タイトルと著者のプロパティをそれぞれ取得しています。取得できたら、その値をメッセージボックスで表示します。取得できなかった場合（エラーが発生した場合やプロパティが存在しない場合）は、代わりにエラーメッセージを表示します。

ただし、エクセルのドキュメントプロパティが設定されていない場合、このコードは「プロパティが存在しないかアクセスできない」旨のメッセージを表示します。

サンプルコード2: 組み込みドキュメントプロパティの設定

組み込みドキュメントプロパティは、値を設定することも可能です。以下に、組み込みドキュメントプロパティの「Title」を設定するサンプルコードを示します。

Sub SetDocumentProperty()
    ActiveWorkbook.BuiltinDocumentProperties("Title").Value = "My New Title"
End Sub

このコードでは、「BuiltinDocumentProperties」プロパティを使用して、アクティブワークブックの「Title」プロパティの値を「My New Title」に設定しています。

「BuiltinDocumentProperties」プロパティを使用することで、ワークブックの基本情報を簡単に取得したり設定したりすることができます。これを活用することで、ワークブックのメタデータを管理する際の作業を効率化できます。

アクセス可能な組み込みドキュメントプロパティ

Excel VBAのBuiltinDocumentPropertiesプロパティを通じてアクセス可能な組み込みドキュメントプロパティは以下の通りです：

1. Title
2. Subject
3. Author
4. Keywords
5. Comments
6. Template
7. Last Author
8. Revision Number
9. Application Name
10. Last Print Date
11. Creation Date
12. Last Save Time
13. Total Editing Time
14. Number of Pages
15. Number of Words
16. Number of Characters
17. Security
18. Category
19. Format
20. Manager
21. Company
22. Number of Bytes
23. Number of Lines
24. Number of Paragraphs
25. Number of Slides
26. Number of Notes
27. Number of Hidden Slides
28. Number of Multimedia Clips
29. Hyperlink Base
30. Number of Characters (with spaces)
31. Content Type
32. Content Status
33. Language
34. Document Version

ただし、これらのプロパティがすべて使用可能であるわけではありません。一部は特定のアプリケーションや状況でのみ有効です。また、これらのプロパティは読み取り専用のものもあります。

エクセルのドキュメントプロパティが設定されていない場合、またはアクセスする権限がない場合、これらのプロパティにアクセスしようとするとエラーが発生します。