none
comment ouvrir un fichier power point avec vbe 2010 ? RRS feed

  • Question

  • Bonjour,

    Je viens solliciter votre aide pour m'aider à résoudre mon petit problème.

    je souhaite ouvrir un document power point avec vbe 2010, sauf que je ne sais pas comment faire !

    Est ce possible de faire ca ? si oui, comment ? je précise que l'ouverture de cette présentation se fait par l'action d'un clic sur un bouton.

    Merci de votre aide

    Cordialement

    Lunick

    jeudi 25 avril 2013 09:27

Réponses

  • Bonjour Lunick,

    S'il s'agit de visualiser le diaporama, tu peux utiliser Process :

        Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
            Dim proc As New Process()
    
            proc.StartInfo.FileName = "C:\Users\...\NomDuPPS.pps"
            'Démarrage du processus : PowerPoint s'il est associé aux pps.
            proc.Start()
            proc.Close()
        End Sub


    Cordialement, Jacques

    • Proposé comme réponse Aurel Bera jeudi 25 avril 2013 09:54
    • Marqué comme réponse Lunick jeudi 25 avril 2013 13:13
    jeudi 25 avril 2013 09:52

Toutes les réponses

  • Bonjour Lunick,

    S'il s'agit de visualiser le diaporama, tu peux utiliser Process :

        Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
            Dim proc As New Process()
    
            proc.StartInfo.FileName = "C:\Users\...\NomDuPPS.pps"
            'Démarrage du processus : PowerPoint s'il est associé aux pps.
            proc.Start()
            proc.Close()
        End Sub


    Cordialement, Jacques

    • Proposé comme réponse Aurel Bera jeudi 25 avril 2013 09:54
    • Marqué comme réponse Lunick jeudi 25 avril 2013 13:13
    jeudi 25 avril 2013 09:52
  • bonjour,

    merci pour votre réponse, ca marche très bien.

    Cependant, est il possible de lier ce powerpoint au programme grâce aux ressources ? Si oui, comment l'ouvre t on ?

    Merci de vos réponse

    Cordialement

    Lunick

    lundi 13 mai 2013 08:01
  • Bonjour Lunick,

    Un solution serait de l'enregistrer dans un fichier temporaire, un peu comme une PJ de mail, le temps de l’exécuter :

       Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
            Dim proc As New Process()
            Dim fName As String = Path.GetTempPath() & "MonPPS.pps"
            Dim f As New System.IO.BinaryWriter(File.Open(fName, FileMode.Create))
    
            f.Write(My.Resources.MonPPS())
            f.Close()
            proc.StartInfo.FileName = fName
            'Démarrage du processus : PowerPoint s'il est associé aux pps.
            proc.Start()
            While Not proc.HasExited
                Application.DoEvents()
            End While
            proc.Close()
            File.Delete(fName)
        End Sub

    PS : La  prochaine fois, ouvres plutôt un nouveau fil, car tu as marqué celui-ci comme résolu le 25/04/13


    Cordialement, Jacques

    lundi 13 mai 2013 10:12
  • Bonjour,

    merci pour votre réponse. Je vais ouvrir un nouveau post en vous citant.

    En faisant comme vous dites, ca ne marche pas, et j'ai un message qui me dit que le chemin d'acces au fichier ce trouvant dans le dossier temporaire est incorrect ou que le  fichier n'existe pas.

    Si vous avez une autre solution ?

    Merci

    Cordialement

    Lunick

    lundi 13 mai 2013 15:38