VBA:[Tips]ユーザ設定のドキュメント値を書き込む - UncodeProduction

なにがどう

ユーザ設定のプロパティ情報を記入したい

どうするのか

下記情報を持たせる

ActiveWorkbook.CustomDocumentProperties.Add_

                       Name:= "プロパティ名", _
                       LinkToContent:= false, _
                       Type:= "種類", _
                       Value:="日付情報"

Name…プロパティ名
LinkToContent…ユーザー設定のドキュメント プロパティの値がコンテナ ドキュメントの内容にリンクされているかどうかを判断
Type…登録する値の種類
Value…プロパティ値

Typeには以下が存在して厳密に区別されているので注意が必要で必ず設定する必要あり。
もちろん日付型を設定した時に日付以外の型は登録できない

メンバ名	説明
msoPropertyTypeBoolean	ブール型 (Boolean) の値
msoPropertyTypeDate	日付型 (Date) の値
msoPropertyTypeFloat	浮動小数点型 (Floating point) の値
msoPropertyTypeNumber	整数型 (Integer) の値
msoPropertyTypeString	文字列型 (String) の値

補足

• 書き込みを行う際、読み取り専用ファイルの場合書き込みができないためにエラーが発生する。

→例外処理を書いてエラーを回避する必要がある

• 別のユーザにファイルが使われているときに書き込みできずにエラーが発生する場合がある

→例外処理を書いてエラーを回避する必要がある

• ファイルがそもそも存在しない場合

→これもまた例外処理を書いてエラーを回避する必要がある