PROCÉDURE : Utiliser Automation pour obtenir et définir les propriétés de documents Office à l'aide de Visual Basic .NET

Ancien nº de publication de cet article : F303294
Cet article a été archivé. Il est proposé « en l'état » et ne sera plus mis à jour.
Résumé
Cet article illustre la procédure permettant d'automatiser Word à l'aide de Visual Basic .NET afin de récupérer et de manipuler les propriétés des documents. Bien que l'exemple fourni dans cet article ait été écrit spécifiquement pour automatiser Word, les mêmes principes peuvent être appliqués à Excel et PowerPoint.
Plus d'informations

Création d'un client Automation pour Microsoft Word

  1. Démarrez Visual Studio .NET. Dans le menu Fichier, cliquez sur Nouveau, puis sur Projet. Sélectionnez Application Windows dans les types de projets Visual Basic. Form1 est créé par défaut.
  2. Ajoutez une référence à la Bibliothèque d'objets Microsoft Word. Pour ce faire, procédez comme suit :
    1. Dans le menu Projet, cliquez sur Ajouter une référence.
    2. Sous l'onglet COM, recherchez Microsoft Word X.0 Object Library, puis cliquez sur Sélectionner.

      REMARQUE : la bibliothèque d'objets Microsoft Word contient un numéro de version (9.0 pour Word 2000 et 10.0 pour Word 2002).
    3. Cliquez sur OK dans la boîte de dialogue Ajouter une référence pour accepter vos sélections. Si vous recevez une invite pour générer des wrappers pour les bibliothèques sélectionnées, cliquez sur Oui.
  3. Dans le menu Affichage, sélectionnez Boîte à outils pour afficher la boîte à outils et ajoutez un bouton à Form1.
  4. Double-cliquez sur Button1. La fenêtre de code du formulaire s'affiche.
  5. Dans la fenêtre de code, remplacez le code suivant
    Private Sub Button1_Click(ByVal sender As System.Object, _                          ByVal e As System.EventArgs) _                          Handles Button1.ClickEnd Sub
    par :
    Private Sub Button1_Click(ByVal sender As System.Object, _                          ByVal e As System.EventArgs) _                          Handles Button1.Click        Dim oWord As Word.Application        Dim oDoc As Word.Document        Dim oBuiltInProps As Object        Dim oCustomProps As Object        Dim oProp As Object        Dim strValue As String        'Créer une instance de Word visible.        oWord = CreateObject("Word.Application")        oWord.Visible = True        'Créer un nouveau document        oDoc = oWord.Documents.Add()        'Obtenir la collection des propriétés de document intégrées.        oBuiltInProps = oDoc.BuiltInDocumentProperties        'Obtenir la valeur de la propriété Auteur et l'afficher        strValue = oBuiltInProps.Item("Author").Value        MsgBox("L'auteur de ce document est " & strValue)                'Définir la valeur de la propriété Objet.        oBuiltInProps.Item("Subject").Value = _                  "Article de la Base de connaissances Q303294"        'Obtenir la collection des propriétés de document personnalisées.        oCustomProps = oDoc.CustomDocumentProperties        'Ajouter une propriété nommée Article de la Base de connaissances        'et lui donner la valeur Q303294.        oCustomProps.Add("Article de la Base de connaissances", False, _                  Office.MsoDocProperties.msoPropertyTypeString, "Q303294")        'Afficher une boîte de message pour permettre à l'utilisateur de vérifier les        'propriétés.        MsgBox("Sélectionnez Propriétés dans le menu Fichier " _               & "pour afficher les modifications." & Chr(10) _               & "Sélectionnez l'onglet Résumé pour afficher " _               & "l'objet et l'onglet Personnalisation pour afficher les propriétés " _               & "personnalisées.", MsgBoxStyle.Information, _               "Vérifiez les propriétés du fichier")        'Nettoyer. Laisser Word poursuivre son exécution.        oCustomProps = Nothing        oBuiltInProps = Nothing        oDoc = Nothing        oWord = Nothing    End Sub
  6. par : Si vous avez référencé la bibliothèque d'objets Word 2002, ajoutez la ligne suivante au début de la fenêtre de code :
    Imports Office=Microsoft.Office.Core 'Requis pour Word 2002, mais pas pour Word 2000
  7. par : Appuyez sur F5 pour exécuter l'application.
  8. par : Cliquez sur Button1 pour démarrer Word.
Ce code illustre la lecture et l'écriture de propriétés de document intégrées et personnalisées. Lorsqu'il est exécuté, il affiche la valeur de la propriété intégrée Auteur, remplace la valeur de la propriété Objet par "Article de la Base de connaissances Q303294" et crée une nouvelle propriété de document personnalisée nommée "Article de la Base de connaissances". Lorsque vous êtes invité à afficher les modifications, basculez dans Word et cliquez sur Propriétés dans le menu Fichier.
Références
Pour plus d'informations, visitez le site Web de MSDN (Microsoft Developer Network) à l'adresse suivante :
Développement Microsoft Office avec Visual Studio
http://msdn2.microsoft.com/en-us/library/aa188489(office.10).aspx
Pour plus d'informations, cliquez sur le numéro ci-dessous pour afficher l'article correspondant dans la Base de connaissances Microsoft :
303296 PROCÉDURE : Utiliser Automation pour obtenir et définir les propriétés de documents Office à l'aide de Visual C# .NET
Propriétés

ID d'article : 303294 - Dernière mise à jour : 12/06/2015 03:53:21 - Révision : 4.1

Microsoft Visual Basic .NET 2002 Initiation, Microsoft Excel 2000 Standard, Microsoft Excel 2002, Microsoft PowerPoint 2000 Standard, Microsoft PowerPoint 2002 Standard, Microsoft Word 2000 Standard Edition, Microsoft Word 2002 Standard Edition

  • kbnosurvey kbarchive _ik11561 kbautomation kbexcel kbgrpdso kbhowto kbword KB303294
Commentaires