Discussion :

[crealinks]

Je cherche à pouvoir "controler" une animation power point. Microsoft ne fournit pas d'ocx permettant d'encapsuler un ppt dans une application... J'ai bien trouvé des ocx payant, mais qui, en réalité, utilise l'automation pour afficher le power point.
J'ai également pensé à utilisé le pptViewer, mais il affiche un splashscreen, et je voudrais éviter.

Je souhaite donc utiliser automation pour initialiser Powerpoint et lancer l'animation. Je pense que c'est tout a fait faisable.

J'ai récupéré quelques sources sur le net, qui montre comment utiliser l'automation avec office, et particulierement avec powerpoint.

J'ai cependant toujours les meme erreurs :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Erreur	1	Le type 'Microsoft.Office.Core.MsoTriState' est défini dans un assembly qui n'est pas référencé. Vous devez ajouter une référence à l'assembly 'office, Version=11.0.0.0, Culture=neutral, PublicKeyToken=71e9bce111e9429c'.

et aussi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Erreur	5	Argument '3' : impossible de convertir de 'Microsoft.Office.Core.MsoTriState [c:\Documents and Settings\aurelien\Mes documents\ST50\developpement\Recherche\DotNET\ppt\MSPPTApp\obj\Debug\Interop.Microsoft.Office.Core.dll]' en 'Microsoft.Office.Core.MsoTriState []'	C:\Documents and Settings\aurelien\Mes documents\ST50\developpement\Recherche\DotNET\ppt\MSPPTApp\PPTAuto.cs	39

En fait, il me sort des erreurs dès que j'utilise des types enum du genre Microsoft.Office.Core.Mso*

Voici le code que j'essaie d'utiliser :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
String strTemplate;
strTemplate = "C:\\Program Files\\Microsoft Office\\Templates\\Presentation Designs\\Glass Layers.pot";
//Create a new presentation based on a template.
objApp = new PowerPoint.Application();
objApp.Visible = Microsoft.Office.Core.MsoTriState.msoCTrue;
objPresSet = objApp.Presentations;
objPres = objPresSet.Open(strTemplate, 
(MsoTriState)0, MsoTriState.msoTrue, MsoTriState.msoTrue);
 
objSlides = objPres.Slides;
// Adding a slide 
objSlide = objSlides.Add(1,PowerPoint.PpSlideLayout.ppLayoutTitleOnly);		objSlide.Shapes.AddTextbox(MsoTextOrientation.msoTextOrientationHorizontal,100,100,500,80);

C'est ma 1er appli en .NET il y a encore des messages d'erreur que j'ai du mal à décrypter :p

Si vous avez une piste...

Aurélien

[theMonz31]

Salut

juste un petit bout de code pour démarrer avec PowerPoint en C#

Ne pas oublier l'ajout de la reference à l'objet Com : Microsoft Power Point 11

Voici le code.. qui se contente d'ouvrir power Point... et de le montrer
sans la spashScreen

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using Microsoft.Office.Core;
using Microsoft.Office.Interop;
using Microsoft.Office.Interop.PowerPoint;
 
namespace PowerPointKiller
{
    public partial class Form1 : Form
    {
        private ApplicationClass oPPT;
        public Form1()
        {
            InitializeComponent();
            oPPT = new ApplicationClass();
        }
 
        private void button1_Click(object sender, EventArgs e)
        {
            oPPT.ShowStartupDialog = MsoTriState.msoCTrue;
            oPPT.Visible = MsoTriState.msoCTrue;
        }
    }
}

The Monz, Toulouse

[Bz]

Pour ma part j'utilise les liaisons tardives, comme ca, ca fonctionne quelque soit la version de powerpoint installée.
Par exemple pour ouvrir powerpoint

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
        Dim objPowerpoint As New Object
        Try
            objPowerpoint = GetObject(, "Powerpoint.Application")
        Catch e As Exception
            objPowerpoint = CreateObject("Powerpoint.Application")
            Debug.Write("Ouverture Powerpoint")
        End Try
        objPowerpoint.Visible = True
        objPowerpoint.WindowState = 2  
        pObjPres = objPowerpoint.Presentations.open(strCheminfichier)
        pObjDocWindows = objPowerpoint.ActiveWindow

[Thomas Lebrun]

http://morpheus.developpez.com/vsto2/#LVI-C