方法 : ドキュメント プロパティの読み込みと書き込みを行う

上記の Microsoft Office アプリケーションでは、ドキュメント プロパティをドキュメントと共に保存できます。 これらのアプリケーションには、作成者、タイトル、サブタイトルなどの組み込みのプロパティがあります。 このトピックでは、Microsoft Office Excel および Microsoft Office Word でドキュメント プロパティを設定する方法について説明します。

関連のビデオ デモについては、「How Do I: Access and Manipulate Custom Document Properties in Microsoft Word? (操作方法: Microsoft Word のカスタム ドキュメント プロパティにアクセスして操作する)」を参照してください。

対象: このトピックの情報は、Excel 2007 と Excel 2010、PowerPoint 2007 と PowerPoint 2010、Project 2007 と Project 2010、および Word 2007 と Word 2010 のドキュメント レベルのプロジェクトおよびアプリケーション レベルのプロジェクトに適用されます。詳細については、「Office アプリケーションおよびプロジェクト タイプ別の使用可能な機能」を参照してください。

Excel のドキュメント プロパティの設定

Excel の組み込みプロパティを操作するには、次のプロパティを使用します。

• ドキュメント レベルのプロジェクトの場合、ThisWorkbook クラスの BuiltinDocumentProperties プロパティを使用します。

• アプリケーション レベルのプロジェクトの場合、Microsoft.Office.Interop.Excel.Workbook オブジェクトの BuiltinDocumentProperties プロパティを使用します。

これらのプロパティは、DocumentProperty オブジェクトのコレクションである DocumentProperties オブジェクトを返します。 このコレクションの Item プロパティを使用すると、名前またはコレクション内のインデックスを利用して、特定のプロパティを取得できます。

ドキュメント レベルのプロジェクトで組み込みの Revision Number プロパティを変更する方法を次のコード例に示します。

Excel の Revision Number プロパティを変更するには

1. 組み込みのドキュメント プロパティを変数に代入します。

   Dim properties As Microsoft.Office.Core.DocumentProperties
   
   properties = DirectCast(Globals.ThisWorkbook.BuiltinDocumentProperties, _
       Microsoft.Office.Core.DocumentProperties)
   
   Dim prop As Microsoft.Office.Core.DocumentProperty
   prop = properties.Item("Revision Number")
   

   Microsoft.Office.Core.DocumentProperties properties;
   
   properties = (Microsoft.Office.Core.DocumentProperties)
       Globals.ThisWorkbook.BuiltinDocumentProperties; 
   
   Microsoft.Office.Core.DocumentProperty prop;
   prop = properties["Revision Number"]; 
   

2. Revision Number プロパティの値を 1 つ増加させます。

   If prop.Value Is Nothing Then
       prop.Value = 1
   Else
       Dim revision As Integer
       If Integer.TryParse(prop.Value.ToString(), revision) Then
           prop.Value = revision + 1
           MessageBox.Show("Revision Number = " & revision)
       Else
           MessageBox.Show("Revision Number = invalid value")
       End If
   End If
   

   if (prop.Value == null)
   {
       prop.Value = 1;
   }
   else
   {
       int revision;
       if (int.TryParse((string)prop.Value, out revision))
       {
           prop.Value = revision + 1;
           MessageBox.Show("Revision Number = " + revision);
       }
       else
       {
           MessageBox.Show("Revision Number = invalid value");
       }
   }
   

Word のドキュメント プロパティの設定

Word の組み込みプロパティを操作するには、次のプロパティを使用します。

• ドキュメント レベルのプロジェクトの場合、ThisDocument クラスの BuiltInDocumentProperties プロパティを使用します。

• アプリケーション レベルのプロジェクトの場合、Microsoft.Office.Interop.Word.Document オブジェクトの BuiltInDocumentProperties プロパティを使用します。

これらのプロパティは、DocumentProperty オブジェクトのコレクションである DocumentProperties オブジェクトを返します。 このコレクションの Item プロパティを使用すると、名前またはコレクション内のインデックスを利用して、特定のプロパティを取得できます。

ドキュメント レベルのプロジェクトで組み込みの Subject プロパティを変更する方法を次のコード例に示します。

Subject プロパティを変更するには

1. 組み込みのドキュメント プロパティを変数に代入します。

   Dim properties As Microsoft.Office.Core.DocumentProperties
   
   properties = DirectCast(Globals.ThisDocument.BuiltInDocumentProperties, _
       Microsoft.Office.Core.DocumentProperties)
   

   Microsoft.Office.Core.DocumentProperties properties;
   
   properties = (Microsoft.Office.Core.DocumentProperties)
       Globals.ThisDocument.BuiltInDocumentProperties; 
   

2. Subject プロパティを "Whitepaper" に変更します。

   ' Set the Subject property.
   properties.Item("Subject").Value = "Whitepaper"
   

   // Set the Subject property. 
   properties["Subject"].Value = "Whitepaper"; 
   

信頼性の高いプログラミング

この例では、Excel の場合はドキュメント レベルのプロジェクトの ThisWorkbook クラス、Word の場合はドキュメント レベルのプロジェクトの ThisDocument クラスにコードを記述していることを前提としています。

Word と Word オブジェクトまたは Excel と Excel オブジェクトを操作している場合も、Microsoft Office では、使用可能な組み込みドキュメント プロパティの一覧が表示されます。 未定義のプロパティへのアクセスを試みると、例外が発生します。

参照

処理手順

方法 : カスタム ドキュメント プロパティを作成および変更する

概念

アプリケーション レベルのアドインのプログラミング

ドキュメント レベルのカスタマイズのプログラミング