Comment : lire des propriétés de document et en écrire

Article
08/10/2011

Vous pouvez stocker des propriétés de document avec un document dans les applications Microsoft Office répertoriées ci-dessus. Ces applications fournissent un certain nombre de propriétés intégrées, telles que l'auteur, le titre et l'objet. Cette rubrique indique comment définir des propriétés de document dans Microsoft Office Excel et Microsoft Office Word.

lien vers la vidéo Pour une démonstration vidéo connexe, consultez Comment faire pour accéder à des propriétés du document personnalisées et les utiliser dans Microsoft Word ? (page éventuellement en anglais).

S'applique à : Les informations contenues dans cette rubrique s'appliquent aux projets de niveau document pour les applications suivantes : Excel 2007, Excel 2010, PowerPoint 2007, PowerPoint 2010, Project 2007, Project 2010, Word 2007 et Word 2010. Pour en savoir plus, consultez Fonctionnalités disponibles par type d'application et de projet Office.

Définition des propriétés de document dans Excel

Pour travailler avec des propriétés intégrées dans Excel, utilisez les propriétés suivantes :

Dans un projet au niveau du document, utilisez la propriété BuiltinDocumentProperties de la classe ThisWorkbook.
Dans un projet au niveau de l'application, utilisez la propriété BuiltinDocumentProperties d'un objet Microsoft.Office.Interop.Excel.Workbook.

Ces propriétés retournent un objet DocumentProperties qui est une collection d'objets DocumentProperty. Vous pouvez utiliser la propriété Item de la collection pour récupérer une propriété particulière, par nom ou par index dans la collection.

L'exemple de code suivant indique comment modifier la propriété intégrée Revision Number dans un projet au niveau du document.

Pour modifier la propriété Revision Number dans Excel

Assignez les propriétés de document intégrées à une variable.

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"];

Incrémentez la propriété Revision Number de un.

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");
    }
}

Définition des propriétés de document dans Word

Pour travailler avec des propriétés intégrées dans Word, utilisez les propriétés suivantes :

Dans un projet au niveau du document, utilisez la propriété BuiltInDocumentProperties de la classe ThisDocument.
Dans un projet au niveau de l'application, utilisez la propriété BuiltInDocumentProperties d'un objet Microsoft.Office.Interop.Word.Document.

L'exemple de code suivant indique comment modifier la propriété intégrée Subject dans un projet au niveau du document.

Pour modifier la propriété Subject

Assignez les propriétés de document intégrées à une variable.

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;

Remplacez la valeur de la propriété Subject par « Whitepaper ».

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

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

Programmation fiable

Les exemples supposent que vous avez écrit le code dans la classe ThisWorkbook dans un projet au niveau du document pour Excel et dans la classe ThisDocument pour Word.

Bien que vous utilisiez Word et Excel ainsi que leurs objets, Microsoft Office fournit la liste des propriétés de document intégrées disponibles. La tentative d'accès à une propriété indéfinie déclenche une exception.