関数・メソッド

ブックのプロパティを取得する【BuiltinDocumentPropertiesプロパティ】【ExcelVBA】

構文

Object.BuiltinDocumentProperties.index

index・・・ワークブックのプロパティ取得

BuiltinDocumentPropertiesプロパティはObjectに指定したプロパティを取得します。
ワークブックの作成者や作成日時、アクセス日時などを取得可能です。
取得可能な情報は以下参照。※一例です

名前インデックス番号説明
Title1タイトル
Subject2件名
Author3作成者
Keywords4タグ(キーワード)
Comments5コメント
Template6テンプレート
Last Author7前回保存者
Revision Number8改訂番号
Last print Date10前回印刷日
Creation Date11作成日時
Last Save Time12更新日時
Total Editing Time13編集時間(分)
Number of Oages14ページ数
Number of Words15単語数
Number of Characters16文字数(スペースは含まない)
Security17セキュリティ(パスワード保護)

BuiltinDocumentPropertiesプロパティのサンプルコード

Public Sub sample()
    '■タイトルを反映(インデックス番号で反映)
    ThisWorkbook.BuiltinDocumentProperties(1) = "sample" '1=タイトルをsampleに変更
    '■コメントを反映(名前で反映)
    ThisWorkbook.BuiltinDocumentProperties("Comments") = "test" 'Comments=コメントをtestに変更
    
    
    '■タイトルを取得(名前で取得)
    Debug.Print ThisWorkbook.BuiltinDocumentProperties("Title") 'sample
    '■コメントを取得(インデックス番号で取得)
    Debug.Print ThisWorkbook.BuiltinDocumentProperties(5)           'test
    
    
    '■設定されていない値や名前を取得すると実行時エラー '5':プロシージャの呼び出し、または引数が不正です。
    Debug.Print ThisWorkbook.BuiltinDocumentProperties(999)
    Debug.Print ThisWorkbook.BuiltinDocumentProperties("aaa")
End Sub

注意点

  • ブックのプロパティを削除したい場合は RemoveDocumentInformation メソッドを参照ください。
  • 設定されていないプロパティを参照する場合はエラーが発生します。

関連記事

 

コメント

タイトルとURLをコピーしました