Visual Studio 2005 Tools for Microsoft Office: L'automation Office en .NET

Date de publication : 28/09/2005 , Date de mise a jour : 28/09/2005

Par LEBRUN Thomas (Autres Articles)
 

Les VSTO 2 (Visual Studio 2005 Tools For Office) représentent la nouvelle génération d'outils de développement d'applications Microsoft Office.
Cet article vous présentera ces outils ainsi que leurs fonctionnalités.

I. Présentation des VSTO 2

I-A. Présentation

• une intégration complète d'Office (Word/Excel) dans l'IDE Visual Studio 2005
• une facilité de développement (drag & drop, etc...)

I-B. Comment ça marche ?

Les applications Microsoft Office sont des serveurs COM. Par conséquent, l'intéraction entre une application Microsoft Office et du code .NET se nomme "Interop COM".
Lorsque vous développez, vous écrivez votre code managé (votre code .NET) dans une "Interop Assembly" (IA), qui est l'équivalent managé .NET de la librairie COM.
Avec Microsoft Office 97 et Microsoft Office 2000, ces IAs sont auto-générées avec l'outil TlbImp: cet outil, livré avec le Framework .NET, sert à lire une librairie COM et à générer l'IA correspondante permettant son utilisation par du code .NET.
De son coté, Microsoft Office XP inclut, quant à lui, des IAs prégénérées (et optimisées) que vous devez utiliser plutôt que les IAs auto-générées par TlbImp.
Une IA distribuée par le propriétaire original d'un serveur COM est appellée "Primary Interop Assembly" (PIA) et Microsoft met à disposition des développeurs les PIAs d' Microsoft Office XP et d' Microsoft Office 2003 (consultez ce  lien si vous désirez plus d'informations sur les PIAs et les IAs).

Vous devez penser à toujours utiliser la version spécifique de l'IA qui correspond à la version d'Office que vous voulez manipuler. Exemple pour Microsoft Word:

• Microsoft Office 97: Microsoft Word 8.0 Object Library
• Microsoft Office 2000: Microsoft Word 9.0 Object Library
• Microsoft Office XP: Microsoft Word 10.0 Object Library
• Microsoft Office 2003: Microsoft Word 11.0 Object Library

II. Possibilités des VSTO 2

• Gérer et créer des tableaux : vous pouvez ainsi ajouter un nouveau tableau, ajouter ou supprimer des lignes à un tableau déjà existant, etc.
• Gérer des graphiques : là encore, vous êtes entièrement libre d'ajouter ou supprimer des graphiques à votre documents, etc.
• Créer des barres de menus personnalisées: si votre application nécessite sa propre barre de menu, intégrée directement dans votre document Word et/ou Excel, rien de plus facile.

Ajout d'un graphique
			// On cherche la feuille qui nous intèresse
            Worksheet xlSheet = (Worksheet)this.Worksheets[1];

            // On définit la plage de donnée à utiliser.
            // Dans notre cas, on utilise le tableau ListObjects (objet de type ListObject déclaré plus haut)
            Excel.Range cellRange = (Excel.Range)xlSheet.ListObjects[1].Range;

            // On ajoute un nouveau graphique
            Excel._Chart xlChart = (Excel.Chart)this.Charts.Add(missing, missing, missing, missing);

            // On définit le type de graphique
            xlChart.ChartType = Excel.XlChartType.xl3DColumn;

            // On indique la source de données du graphique
            // Dans notre cas, on utilise la colonne prix du tableau ListObject
            xlChart.SetSourceData(cellRange.Columns.get_Range("C1", "C2"), Type.Missing);

            // On donne un nom au graphique
            xlChart.HasTitle = true;
            xlChart.ChartTitle.Font.Size = 16;
            xlChart.ChartTitle.Font.Bold = true;
            xlChart.ChartTitle.Text = "Graphique du prix des produits";

            // On définit les 2 axes du graphique, et leur propriétés
            Excel.Axis axis;
            axis = (Excel.Axis) xlChart.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary);
            axis.HasTitle = true;
            axis.AxisTitle.Text = "Produit";
            axis.HasMajorGridlines = true;
            axis.HasMinorGridlines = false;

            axis = (Excel.Axis) xlChart.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary);
            axis.HasTitle = true;
            axis.AxisTitle.Text = "Prix";
            axis.HasMajorGridlines = true;
            axis.HasMinorGridlines = false;

            // On s'occupe de la légende
            xlChart.WallsAndGridlines2D = false;
            xlChart.HasLegend = true;
	 // On sélectionne la légende et on indique sa postion 
            xlChart.Legend.Select();
            xlChart.Legend.Position = Excel.XlLegendPosition.xlLegendPositionRight;


            // Et enfin, on indique la position du graphique: si c'est un nouvelle feuille
	   // ou si on incorpore le graphique dans notre feuille
            xlChart.Location(XlChartLocation.xlLocationAsObject, xlSheet.Name);

Ajout d'une barre de menu
		// La barre de menu
        private Office.CommandBar cbar = null;
        // Les items de la barre
        private Office.CommandBarButton cbPrintPreview = null;
        private Office.CommandBarButton cbSaveAs = null;
        // Les évènements qui se produisent lors du clic sur les items de la barre
        private Office._CommandBarButtonEvents_ClickEventHandler cbPrintPreviewClickEvent;
        private Office._CommandBarButtonEvents_ClickEventHandler cbSaveAsClickEvent;
        
        // On peut omettre les paramètres optionnels
        object oMissing = System.Reflection.Missing.Value;

        // Texte de la barre de menu + position
        cbar = this.Application.CommandBars.Add("Menu .NET Solutions", oMissing, oMissing, (object)true);

        // Ajout d'un nouveau bouton pour Aperçu avant Impression
        cbPrintPreview = (Office.CommandBarButton)(cbar.Controls.Add((object)1, oMissing, oMissing, oMissing, oMissing));
        // Type de bouton
        cbPrintPreview.Style = Office.MsoButtonStyle.msoButtonCaption;
        // Texte du Bouton
        cbPrintPreview.Caption = "Aperçu Avant Impression";
        // Méthode à appeller lors du clic sur l'item
        cbPrintPreviewClickEvent = new Microsoft.Office.Core._CommandBarButtonEvents_ClickEventHandler(
	cbPrintPreviewClickEvent_Click);
        cbPrintPreview.Click += cbPrintPreviewClickEvent;

        // Ajout d'un nouveau bouton pour Sauvegarder la fiche
        cbSaveAs = (Office.CommandBarButton)(cbar.Controls.Add((object)1, oMissing, oMissing, oMissing, oMissing));
        // Type de bouton
        cbSaveAs.Style = Office.MsoButtonStyle.msoButtonCaption;
        // Texte du Bouton
        cbSaveAs.Caption = "Sauvegarder la fiche";
        // Méthode à appeller lors du clic sur l'item
        cbSaveAsClickEvent = new Microsoft.Office.Core._CommandBarButtonEvents_ClickEventHandler(
	cbSaveAsClickEvent_Click);
        cbSaveAs.Click += cbSaveAsClickEvent;
        // On insère un séparateur entre les éléments du menu
        cbSaveAs.BeginGroup = true;

        // On affiche la barre de menu
        cbar.Visible = true;
            
        private void cbPrintPreviewClickEvent_Click(Office.CommandBarButton btn, ref bool Cancel)
        {
            // Lancement de l'aperçu avant impression
            this.PrintPreview((object)true);
        }

        private void cbSaveAsClickEvent_Click(Office.CommandBarButton btn, ref bool Cancel)
        {
            // On demande le nom du fichier
            if (this.sfdSaveAs.ShowDialog() == DialogResult.OK)
            {
                // On peut omettre les paramètres optionnels
                object oMissing = System.Reflection.Missing.Value;

                string filename = this.sfdSaveAs.FileName;

                // Enregistrement du fichier
                this.SaveAs(filename, oMissing, oMissing, oMissing, oMissing,
	oMissing, oMissing, oMissing, oMissing, oMissing);
            }
        }

III. L'ActionsPane

Ajout de contrôles au panneau d'actions
// Au démarrage de l'application
// on ajoute notre TextBox au panneau d'actions

this.ActionsPane.Controls.Add(new TextBox());

• this: Représente l'instance de notre objet courant (notre feuille Excel ou notre document Word par exemple)
• ActionsPane: Représente notre objet ActionsPane
• Controls: C'est la collection qui regroupe tous les contrôles enfants contenus dans l'objet ActionsPane
• Add: Il s'agit de la méthode à utiliser pour ajouter un contrôle à la collection de contrôle déjà existante. Cette méthode prend en paramètre un objet de type Control.

Lorsque vous ajoutez un contrôle à l'ActionsPane, celui-ci est automatiquement affiché. Mais vous pouvez facilement le cacher/faire apparaitre, en utilisant les méthodes Show() et Hide() de votre objet ActionsPane.

IV. Les autres objets particuliers

IV-A. Word

IV-A-1. Bookmark

Cette manipulation des signets s'applique aux bookmarks que vous avez manipulé depuis votre application, mais également aux bookmarks déjà existants dans votre document Word.

Utilisation des Bookmarks
// On Accède aux champs/propriétés du document principal, au moyen de la classe Globals.

// On change la valeur des Bookmarks, en fonction du choix de l'utilisateur
Globals.ThisDocument.bkmClientName.Text = this.cbClient.SelectedValue.ToString();
Globals.ThisDocument.bkmClientAdress.Text = this.tbAdress.Text;
Globals.ThisDocument.bkmClientCP.Text = this.tbCP.Text;
Globals.ThisDocument.bkmClientCity.Text = this.tbCity.Text;

IV-B. Excel

IV-B-1. NamedRanged

Utilisation d'une NamedRanged
// On remplit les valeurs à afficher dans les NamedRanged
this.namedProductId.Value2 = String.Format("ID du produit");
this.namedProductName.Value2 = String.Format("Nom du produit");
this.namedProductPrice.Value2 = String.Format("Prix du produit");

// On passe le texte de cette NameRanged en gras
this.namedProductPrice.Font.Bold = true;

// On change la couleur du texte
// Voir ici pour la liste des codes couleur: http://www.geocities.com/davemcritchie/excel/colors.htm
this.namedProductPrice.Font.ColorIndex = 30;

// On change la taille du texte.
this.namedProductPrice.Font.Size = 20;

IV-B-2. ListObject

• ne pas appeler la méthode Update de votre DataAdapter. Bien que cela fonctionne, je trouve que cela n'est pas très... "propre", c'est pourquoi il existe la deuxième solution
• appeler la méthode Disconnect de votre objet ListObject, et cela juste après l'avoir remplit.

Attention, la méthode Disconnect n'est disponible que depuis la CTP de Juin de Visual Studio 2005 ( source). Ainsi, la BETA 2 de Visual Studio 2005 ne prend pas en compte cette méthode.

Databinding d'un ListObject
this.listProducts.SetDataBinding(this.ProductsBindingSource, "", "Product_ID", "Product_Name", "Product_Price");

V. Les SmartTags

Les SmartTags permettent la reconnaissance de texte dans votre document Microsoft Office. Vous avez la possibilité d'exécuter une ou plusieurs actions (c'est à vous de choisir, selon vos besoins) lorsque la reconnaissance de texte est effectuée.
Les SmartTags existent dans Microsoft Office depuis Microsoft Office XP et ont été améliorés dans Microsoft Office 2003 ( source).
Voici une image vous montrant comment voir qu'un texte a été reconnu:

Mise en place des SmartTags
// Action à exécuter pour le click sur le SmartTag
private Action myAction;

// On définit le SmartTag: on spécifie un nom unique pour le SmartTag
// L'URI ne doit pas contenir d'espace
SmartTag mySmartTag = new SmartTag("http://smarttags.vsto.com#NETSolutionsSmartTag", "NET Solution SmartTag");

// On indique le terme à reconnaitre
mySmartTag.Terms.Add("VSTO");

// On donne un nom à l'action qui sera affichée dans le menu du SmarTag
myAction = new Action("SmartTag NET Solutions - Cliquez moi");

// On indique quelle est l'action à exécuter pour ce SmartTag
mySmartTag.Actions = new Action[] { myAction };

// Et sur quelle action (Dans notre cas, un Click)
myAction.Click += new ActionClickEventHandler(myAction_Click);

// On ajoute le SmartTag au document
Globals.ThisWorkbook.VstoSmartTags.Add(mySmartTag);

// Méthode à exécuter lors du click sur le SmartTag
private void myAction_Click(object sender, ActionEventArgs e)
{
	MessageBox.Show("SmartTag NET Solutions Activé");
}

VI. Un peu plus loin...

VI-A. Excel

VI-A-1. Cache des données

Attention tout de même: dans le cas où vous utilisez la mise en cache, pensez à prévenir l'utilisateur qu'il est en mode déconnecté car il est possible que les données de la base aient été modifiées: l'utilisateur pourrait trouver surprenant de ne pas avoir les bonnes valeurs mais les anciennes (issues de son Dataset de cache).

Implémentation du cache avec les VSTO
// Dataset de cache

[Microsoft.VisualStudio.Tools.Applications.Runtime.Cached]
public Dataset CachedDs;

Utilisation d'un Dataset de Cache
private void Form1_Load(object sender, System.EventArgs e)
{
	// On teste si on arrive à se connecter à la base de données
	if ( !Connected )
	{
		// Si le Dataset de cache n'est pas vide
		if ( this.CachedDs != null )
		{ 
			// On fait notre traitement mais avec les données du Dataset,
		// donc des données potentiellement différentes des données de la base !
			
			Traitement();
			
			// Et on prévient l'utilisateur qu'il est en mode déconnecté
		}
		else
		{
			//
		}
	}
	else
	{
		// On est connecté directement à la base
		Traitement();
	}
}

VI-B. Outlook

VI-B-1. Création d'une barre de menu

Création d'une barre d'outils dans Outlook
// La bar de menu
private Office.CommandBar cbar = null;
// Les items de la barre
private Office.CommandBarButton cbShowConnectionForm = null;
// Les évènements qui se produisent lors du clic sur les items de la barre
private Office._CommandBarButtonEvents_ClickEventHandler cbShowConnectionFormClickEvent;

private void ThisApplication_Startup(object sender, System.EventArgs e)
{
	// Chargement de la barre de menu
    LoadCommandBar();
}

private void LoadCommandBar()
{
	// On peut omettre les paramètres optionnels
    object oMissing = System.Reflection.Missing.Value;

	// Texte de la barre de menu + position
    cbar = this.ActiveExplorer().CommandBars.Add("Menu .NET Solutions - Outlook", oMissing, oMissing, (object)true);

	// Ajout d'un nouveau bouton
    cbShowConnectionForm = (Office.CommandBarButton)(cbar.Controls.Add((object)1, oMissing, oMissing, oMissing, oMissing));
    // Définition du style de bouton
    cbShowConnectionForm.Style = Office.MsoButtonStyle.msoButtonCaption;
    // Définition de sa propriété Caption (Texte à afficher)
    cbShowConnectionForm.Caption = String.Format("Activer l'Addin NET Solutions pour Outlook");

	// Méthode à appeller lors du clic sur l'item
    cbShowConnectionFormClickEvent = new Microsoft.Office.Core._CommandBarButtonEvents_ClickEventHandler(
    cbShowConnectionFormClickEvent_Click);
    cbShowConnectionForm.Click += cbShowConnectionFormClickEvent;

	// On affiche la barre de menu
    cbar.Visible = true;
}

cbar = this.ActiveExplorer().CommandBars.Add("Menu .NET Solutions - Outlook", oMissing, oMissing, (object)true);

VI-B-2. Création d'un nouveau mail

• olAppointmentItem: Pour un item de type Rendez-vous, dans le calendrier
• olContactItem: Pour un item de type Contact
• olDistributionListItem: Pour une liste de distribution
• olJournalItem: Pour une nouvelle entrée dans le journal Outlook
• olMailItem: Pour un nouveau mail
• olNoteItem: Pour une nouvelle note
• olTaskItem: Pour une nouvelle tâche

Instanciation et initialisation d'un nouveau item pour le mail
// On instancie un nouveau mail
// C'est un objet de type MailItem
Outlook.MailItem mail = (Outlook.MailItem)
Globals.ThisApplication.CreateItem(Microsoft.Office.Interop.Outlook.OlItemType.olMailItem);

Préparation et envoi d'un mail
// On renseigne l'adresse email du client dans le mail
 mail.Recipients.Add(this.textBox2.Text);

// On formatte le sujet et le corp du message.
mail.Subject = String.Format("Envoi de facture");
mail.Body = String.Format("A l'attention de {0}:{1}{1}Veillez trouver ci-joint la copie de votre facture.{1}{1}",
textBox1.Text, Environment.NewLine);

// On attache la pièce jointe.
// Paramètres de la méthode Add: 
// - Fichier à attacher
// - Méthode d'attachement au message
// - Position de la pièce jointe
// - Nom affiché de la pièce jointe
mail.Attachments.Add(textBox3.Text, Outlook.OlAttachmentType.olByValue, 1, String.Concat("Facture ", this.textBox2.Text));

// On met le mail au format HTML
mail.BodyFormat = Microsoft.Office.Interop.Outlook.OlBodyFormat.olFormatHTML;
            
// On affiche la fenêtre du mail
mail.Display(false);
                
// Envoi du mail
mail.Send();

VI-B-3. Récupération des contacts Outlook

Récupération des contacts Outlook
// On récupère le répertoire des contacts
Outlook.MAPIFolder contactFolder = null;
contactFolder = Globals.ThisApplication.ActiveExplorer().Session.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderContacts);

// On applique un filtre pour ne rechercher que les objets de type Contat, et pas les listes de distribution/diffusion
string strFind = "[MessageClass] = 'IPM.Contact'";
Outlook.Items items = contactFolder.Items.Restrict(strFind);

// Pour chaque contact du répertoire
for(int i = 1; i < items.Count; i++)
{
	// On récupère le contact en cours
    Outlook.ContactItem ContactItem = (Outlook.ContactItem)items[i];
    
    // Affichage des informations (Nom, prénom, Email, etc...) dans la Treeview.
    this.treeView1.Nodes[0].Nodes.Add(ContactItem.LastName + " " + ContactItem.FirstName);

    // Affichage de l'email si elle existe
    if (ContactItem.Email1Address != null && ContactItem.Email1Address.Length > 0)
    {
    	this.treeView1.Nodes[0].Nodes[i - 1].Nodes.Add("Email : " + ContactItem.Email1Address);
    }
    // Affichage du téléphone Domicile s'il existe
    if (ContactItem.HomeTelephoneNumber != null && ContactItem.HomeTelephoneNumber.Length > 0)
    {
    	this.treeView1.Nodes[0].Nodes[i - 1].Nodes.Add("Téléphone Domicile: " + ContactItem.HomeTelephoneNumber);
    }
    // Affichage du téléphone professionnel s'il existe
    if (ContactItem.BusinessTelephoneNumber != null && ContactItem.BusinessTelephoneNumber.Length > 0)
    {
    	this.treeView1.Nodes[0].Nodes[i - 1].Nodes.Add("Téléphone Bureau: " + ContactItem.BusinessTelephoneNumber);
    }
    // Affichage du téléphone Mobile s'il existe
    if (ContactItem.MobileTelephoneNumber != null && ContactItem.MobileTelephoneNumber.Length > 0)
    {
    	this.treeView1.Nodes[0].Nodes[i - 1].Nodes.Add("Téléphone Portable: " + ContactItem.MobileTelephoneNumber);
    }

	// On déplie la node racine
    this.treeView1.Nodes[0].Expand();
}

Avec ce bout de code, nous parcourons le répertoire Contact d'Outlook puis, pour chaque entrée contenue dans ce répertoire, nous affichons, dans une listview, certaines de ces informations.
La liste complète des propriétés de l'objet ContactItem peut-être retrouvée  ici.
Voici un aperçu, en image, du résultat produit par ce code:

VI-B-4. Création d'un rendez-vous dans le Calendrier Outlook

Création d'un rendez-vous dans le calendrier Outlook
// Méthode de création des RDV dans le calendrier
private void CreateAppointment()
{
	// On instancie notre nouvel objet de type RDV
    // On créé un nouvel item RDV
    Outlook.AppointmentItem rdv = (Outlook.AppointmentItem)
    Globals.ThisApplication.CreateItem(Microsoft.Office.Interop.Outlook.OlItemType.olAppointmentItem);

	// On définit la date de début
    rdv.Start = monthCalendar1.SelectionStart;
    // On définit alors la durée du RDV est: Toute la journée
    rdv.AllDayEvent = true;
    // On indique un sujet
    rdv.Subject = String.Format(String.Concat("Rendez-vous avec ", textBox1.Text));
    // Puis le corp du message du RDV
    rdv.Body = String.Format("Rendez-vous prévu toute la journée dans les locaux de {0}", textBox1.Text);
    // On change le statut
    rdv.BusyStatus = Microsoft.Office.Interop.Outlook.OlBusyStatus.olOutOfOffice;
    // On active la notification de rappel
    rdv.ReminderSet = true;
    // Avec un rappel commencant 5h00 avant le début du RDV
    rdv.ReminderMinutesBeforeStart = 300;

	// On sauvegarde le RDV dans le calendrier Outlool
    rdv.Save();
}

VI-B-5. Création d'une tâche

Création d'une tâche
private void CreateTask()
{
	// Instanciation de notre objet tache
    Outlook.TaskItem task = (Outlook.TaskItem)
    Globals.ThisApplication.CreateItem(Microsoft.Office.Interop.Outlook.OlItemType.olTaskItem);

	// Date de début de la tache
    task.StartDate = monthCalendar1.SelectionStart;
    // Le statut de la tache: Fini, En cours, Non commenté, etc...
    task.Status = Microsoft.Office.Interop.Outlook.OlTaskStatus.olTaskNotStarted;
    // Le sujet de la tache
    task.Subject = String.Format(String.Concat("Rendez-vous avec ", textBox1.Text));
    // Le corp du message de la tache
    task.Body = String.Format(String.Concat("Rendez-vous avec ", textBox1.Text));
    // On active la notification de rappel
    task.ReminderSet = true;
    // Avec un rappel commencant 24h avant le début de la tache
    task.ReminderTime = monthCalendar1.SelectionStart.AddHours(-24);

	// On sauvegarde la tache
    task.Save();
}

• du rappel de ma tâche
• du rappel de mon rendez-vous

VI-C. PowerPoint

• Ajouter la référence COM de PowerPoint à votre projet: dans l'explorateur de solutions, faîtes un clic droit sur References et choisissez "Add Reference". Sélectionnez l'onglet COM et ajouter la référence suivante: Microsoft PowerPoint 11.0 Object Library
• Déclarez votre objet de type Microsoft.Office.Interop.PowerPoint.Application: c'est grâce à lui que vous pourrez manipuler PowerPoint

Déclaration et instanciation de l'objet Application
// Déclaration de l'objet PowerPoint
private PowerPoint.Application powerPoint;

// Instanciation de l'objet
powerPoint = new Microsoft.Office.Interop.PowerPoint.Application();

VI-C-1. Changement du fond

Changement du fond de la présentation
// Instanciation de l'objet
powerPoint = new Microsoft.Office.Interop.PowerPoint.Application();
            
// On récupère la liste des présentations de l'application PowerPoint
// On créé un nouveau document donc normalement, cela doit être vide
PowerPoint.Presentations ppts = powerPoint.Presentations;

// On ajoute une nouvelle présentation à cette collection
PowerPoint.Presentation ppt = ppts.Add(Microsoft.Office.Core.MsoTriState.msoTrue);

// Pour modifier le fond de tous les slides
ppt.SlideMaster.Background.Fill.UserTextured(Application.StartupPath + 
@"\" + @"Resources\Arrière_plan_PPT_TechEd_2005.jpg");

Changement du fond d'un seul slide
// On récupère la collection de slides de cette présentation
PowerPoint.Slides slides = ppt.Slides;
            
slides[1].Background.Fill.UserTextured(Application.StartupPath + @"\" 
+ @"Resources\Arrière_plan_PPT_TechEd_2005.jpg");

VI-C-2. Ajouter un slide

• la position du slide dans la présentation
• le type de slide à ajouter

• ppLayoutBlank: Insère une diapositive vide
• ppLayoutTitle: Insère une diapositive de présentation
• ppLayoutText: Diapositive permettant de saisir un titre et du texte

Ajout d'un slide
// On récupère la collection de slides de cette présentation
PowerPoint.Slides slides = ppt.Slides;
            
// Et on ajoute un nouveau slide à cette collection
// Prend en paramètre la position à laquelle ajouter le slide
// Et le type de modèle de slides que l'on veut: Dans notre cas, on veut un slide de présentation.
PowerPoint.Slide slideIntro = slides.Add(1, Microsoft.Office.Interop.PowerPoint.PpSlideLayout.ppLayoutTitle);

VI-C-3. Accéder aux éléments d'un slide

Accéder aux éléments d'un slide
// On remplit le texte de la première textbox du template PowerPoint
slideIntro.Shapes[1].TextFrame.TextRange.Text = String.Format("Automation PowerPoint");
// Celui de la deuxième textbox
slideIntro.Shapes[2].TextFrame.TextRange.Text = String.Format("Avec les VSTO 2");
// Et on change la taille de la police de la première TextBox
slideIntro.Shapes[1].TextFrame.TextRange.Font.Size = 50;

Mise en forme dans un slide
// On ajoute un deuxième slide
// Modèle du slide: Titre + Texte
PowerPoint.Slide slideText = slides.Add(2, Microsoft.Office.Interop.PowerPoint.PpSlideLayout.ppLayoutText);
// On insère le texte dans la TextArea du titre
slideText.Shapes[1].TextFrame.TextRange.Text = String.Format("Titre de la présentation");
// On change la police
slideText.Shapes[1].TextFrame.TextRange.Font.Size = 50;
// Et la couleur de la police
slideText.Shapes[1].TextFrame.TextRange.Font.Color.RGB = Color.White.ToArgb();

// On insère du texte dans la TextArea du bas
// On utilise plusieurs niveau d'indentation
slideText.Shapes[2].TextFrame.TextRange.Text = String.Format("Texte de premier niveau");
slideText.Shapes[2].TextFrame.TextRange.Paragraphs(1, 1).IndentLevel = 1;
slideText.Shapes[2].TextFrame.TextRange.InsertAfter(String.Format("{0}Texte de second niveau", Environment.NewLine));
slideText.Shapes[2].TextFrame.TextRange.Paragraphs(2, 1).IndentLevel = 2;
slideText.Shapes[2].TextFrame.TextRange.InsertAfter(String.Format("{0}Texte de troisième niveau", Environment.NewLine));
slideText.Shapes[2].TextFrame.TextRange.Paragraphs(3, 1).IndentLevel = 3;
slideText.Shapes[2].TextFrame.TextRange.InsertAfter(String.Format("{0}Texte de quatrième niveau", Environment.NewLine));
slideText.Shapes[2].TextFrame.TextRange.Paragraphs(4, 1).IndentLevel = 4;
slideText.Shapes[2].TextFrame.TextRange.InsertAfter(String.Format("{0}Texte de cinquième niveau", Environment.NewLine));
slideText.Shapes[2].TextFrame.TextRange.Paragraphs(5, 1).IndentLevel = 5;

VI-C-4. Ajouter un élément à un slide

Ajout d'un élément au slide
// On ajoute un troisième slide
// Modèle du slide: Slide vide
PowerPoint.Slide slide = slides.Add(3, Microsoft.Office.Interop.PowerPoint.PpSlideLayout.ppLayoutBlank);

// On récupère la collection d'éléments (TextBox, Image, etc...) qui sont sur ce 3ème slide
PowerPoint.Shapes shapes = slide.Shapes;

// On ajoute un élément (TextBox) à cette collection et on y insère du texte
// Ici, c'est le texte saisi par l'utilisateur
// On indique l'orientation du texte et les coordonnées où mettre le texte.
PowerPoint.Shape shape = shapes.AddTextbox(Office.MsoTextOrientation.msoTextOrientationHorizontal, 0, 0, 500, 50);
shape.TextFrame.TextRange.InsertAfter(this.tbText.Text);

• Ajouter un nouveau slide à notre présentation
• Récupérer la collection d'éléments (Shapes) présents sur le slide
• Ajouter un élément (Shape) à cette collection: on spécifie pour cela l'orientation du texte, et les coordonnées où placer notre élement
• Pour finir, on insère le texte saisi par l'utilisateur dans notre Textbox

VI-C-5. Ajouter une animation à votre slide

Ajout d'une animation
// Ajout d'un effet sur un élément (la TextBox) de notre slide
PowerPoint.Shape shapeEffect = powerPoint.ActivePresentation.Slides[3].Shapes[1];
PowerPoint.Effect objEffect = powerPoint.ActivePresentation.Slides[3].TimeLine.MainSequence.AddEffect(shapeEffect,
Microsoft.Office.Interop.PowerPoint.MsoAnimEffect.msoAnimEffectPathStairsDown,
Microsoft.Office.Interop.PowerPoint.MsoAnimateByLevel.msoAnimateLevelNone,
Microsoft.Office.Interop.PowerPoint.MsoAnimTriggerType.msoAnimTriggerOnPageClick, 1);

• L'élément qui devra être animé
• Le type d'animation qui devra être jouée
• Pour les graphiques, les diagrammes ou le texte, on indique ensuite le niveau auquel l'effet de l'animation sera appliqué. La valeur par défaut est msoAnimationLevelNone.
• L'action qui déclenchera l'animation. Par défaut, il s'agit de msoAnimTriggerOnPageClick.
• La position à laquelle sera inséré l'animation dans la collection d'animations. La valeur par défaut est -1 (c'est à dire ajouté à la fin)

VI-C-6. Ajouter un commentaire

Ajout d'un commentaire
// Ajout d'un commentaire au 3ème slide la présentation
// On récupère la liste de tous les commentaires présents sur le slide
PowerPoint.Comments comments = slide.Comments;
// On ajoute un commentaire à cette liste
PowerPoint.Comment comment = comments.Add(250, 100, "Thomas LEBRUN", "TL", "Un petit bonjour de votre application VSTO :)");

• les coordonnées où placer le commentaire
• le nom de l'auteur
• les initiales de l'auteur
• le texte du commentaire

VI-C-7. Chargement d'une présentation

Chargement automatique d'une présentation
// Instanciation de l'objet
powerPoint = new Microsoft.Office.Interop.PowerPoint.Application();

// On fait apparaitre l'application à l'utilisateur
powerPoint.Visible = Microsoft.Office.Core.MsoTriState.msoTrue;

powerPoint.Presentations.Open(this.tbLoad.Text, Microsoft.Office.Core.MsoTriState.msoFalse,
Microsoft.Office.Core.MsoTriState.msoFalse, Microsoft.Office.Core.MsoTriState.msoTrue);

Lancement automatique du diaporama
powerPoint.ActivePresentation.SlideShowSettings.Run();

VI-C-8. Libération des ressources

Libération des ressources non managées
if (powerPoint != null)
{
	// Quitte l'application PowerPoint
    powerPoint.Quit();
    powerPoint = null;
}

//
// Double appel à Collect et WaitForPendingFinalizers
// En effet, le référence mémoire vers Excel peut-être conservée après le 1er appel
// On demande donc un deuxième passage du Garbage Collector
//
GC.Collect();
GC.WaitForPendingFinalizers();
GC.Collect();
GC.WaitForPendingFinalizers();

Si vous avez bien suivit jusqu'ici, vous avez dû vous rendre compte que, mis à part Word, Excel et Outlook, les références à ajouter pour manipuler les autres applications Microsoft Office se trouvent toutes dans l'onglet COM de la partie "Ajout de référence". La raison en est simple: Pour le moment, seuls ces trois produits permettent l'exécution d'applications Microsoft Office en environnement managé. Avec la précédente version des VSTO, tout devait être fait par des composants COM (Word, Excel, etc....). Cette nouvelle version apporte donc beaucoup plus de facilité de développement et d'interopérabilité. Cependant, il reste toujours une question en suspends: à quand une version d'Office entièrement managée (c'est-à-dire écrit avec un langage .NET) qu permettra de faire des applications Microsoft Office entièrement managée elles aussi ? ;)

VII. Et le futur ?

Selon Eric CARTER, membre de l'équipe de développement des Visual Studio Tools For Office, le développement des VSTO 3 est prévu et ciblera la plateforme Microsoft Office 12 ( Source).
Leur développement a même déjà commencé: une préview des VSTO 3 a été présentée lors de la session OFF417 de la PDC (Voir  ici pour plus d'informations).
On peut supposer (mais ce n'est que mon avis, rien d'officiel) que cette nouvelle version des VSTO sera disponible en même temps que la future version de Visual Studio (Nom de code: Orcas).

VIII. Conclusions

• des développement simples et rapides d'applications Microsoft Office
• l'utilisation de la puissance de .NET au service d'Office

IX. Liens

 Blog de l'équipe de développement des VSTO

Blogs de certains membres de l'équipe:

•  Eric Carter
•  Misha Shneerson
•  Andrew Whitechapel

La  MSDN

 Microsoft Office 2003 VBA Language References

X. Téléchargements

Vous trouverez ci-joint la solution VSTO 2005 que j'ai réalisé pour écrire cet article:
 Solution Visual Studio 2005
 Scripts SQL
 La solution VS 2005 et les scripts SQL

Une vidéo de démonstration de l'automation PowerPoint en .NET:  Vidéo.
L'article au format  PDF.