High-Tech Santé Médecine Droit-Finances

Auto-Entrepreneur

Comment faire ?

Rechercher : dans
Par :

[Visual Basic] ouvrir présentation powerpoint

Dernière réponse le 11 fév 2009 à 18:23:49 coach_nowel, le 24 jun 2005 à 23:44:46 
 Signaler ce message aux modérateurs

Bonjour,

Je voudrais que quelqu'un m'aide en me disant qu'elle est la commande pour ouvrir une présentation PowerPoint depuis Visual Basic.

Merci de votre aide.

A+

Meilleures réponses pour « [Visual Basic] ouvrir présentation powerpoint » dans :
Ouverture de fichier à partir de Visual basic Voir
Introduction à Visual Basic Voir Présentation de Visual Basic Visual Basic est un outil développé par Microsoft pour développer facilement des applications fonctionnant sous Microsoft Windows ©. Visual Basic est, comme son nom l'indique, un outil visuel permettant de créer...
Visual basic et base de données access Voir
Erreur système : Microsoft Visual Basic VoirEn ouvrant Excel, vous rencontrez un message d'erreur. Une fenêtre au nom de "Microsoft Visual Basic" s'ouvre avec le contenu suivant : Erreur système &H80004005 (-2147467259). Erreur non spécifiée Pour corriger le problème, suivez les...
Comment ouvrir un fichier PPS (présentation PowerPoint) ? VoirComment lire un fichier PPS ? Les fichiers PPS sont des diaporamas crées avec le logiciel PowerPoint. Il s'agit simplement de fichiers PPT dont l'extension du nom de fichier a été modifiée en PPS. Il est possible de les ouvrir avec un des logiciels...
Musique en continu dans une présentation PowerPoint VoirIl est possible, sous PowerPoint de lire une musique en continu tout en faisant défiler le diaporama. Pour ce faire, il suffit de : Insérer le fichier audio dans le diaporama Cliquer avec le bouton droit sur l'icône en forme de haut parleur ...
Télécharger Visual Basic 6 Runtime (VB6 DLL) VoirLe Runtime Visual Basic 6 contient l'ensemble des librairies (DLL) nécessaires pour exécuter des programmes écrits en langage Visual Basic 6.0. Il contient notamment les DLL suivantes :...
Télécharger Visual Basic Express Voir
Télécharger Visual Basic Express Voir
Introduction à VBScript VoirPrésentation de VB Script VBScript (aussi appelé Visual Basic Scripting Edition) est un sous-ensemble du langage Visual Basic for Applications (VBA), un langage propriétaire de Microsoft prévu pour être intégré aux produits Microsoft Office©,...
Posez votre question Répondre

1

Armojax, le 25 jun 2005 à 07:43:52

Bonjour coach_novel,

Je ne suis pas spécialiste de VBA pour PowerPoint, mais essaie : 

Presentations.Open FileName:="c:\My Documents\pres1.ppt"
et cherche dans l'aide de VBA.
Ajx.

   
Répondre à Armojax

2

coach_nowel, le 25 jun 2005 à 16:16:27

Merci Armojax.

Mais je voulais savoir si quelqu'un sait si il faut que je crée un bouton spécial pour insérer cette commande et où je dois l'insérer.
Et est-ce que quelqu'un a un tutoriel pour vba pour Powerpoint?


Merci d'avance!

   
Répondre à coach_nowel

3

Lilou, le 11 avr 2007 à 10:04:24

Bonjour,

J'aurai moi aussi besoin d'aide!
Apres avoir ouvert mon fichier powerpoint, je voudrais copier un tableau sous excel et le coller sous powerpoint....seulement ca ne marche pas . Voici mon code :

Worksheets("Feuille").Activate
Range("B4:P36").Copy

Ppp1.Slides(2).Select
Ppp1.Paste

Quelqu'un peut-il m'aider? merci...

   
Répondre à Lilou

4

Lilou, le 11 avr 2007 à 10:28:44

Bon bin j'ai trouve comme une grande !!!

Worksheets("Feuille 1").Activate
Range("B4:P36").Select
Selection.CopyPicture Appearance:=xlScreen, _
Format:=xlPicture

Ppp1.Slides(2).Select
Ppp1.Slides(2).Shapes.Paste.Select

ppt.ActiveWindow.Selection.ShapeRange.Align msoAlignCenters, True
ppt.ActiveWindow.Selection.ShapeRange.Align msoAlignMiddles, True

Cheers

   
Répondre à Lilou

5

 salhib, le 11 fév 2009 à 18:23:49

Option Explicit
Dim pPT As PowerPoint.Application
Dim pPTopen As PowerPoint.Presentation


Private Sub Command1_Click()
Dim sl As PowerPoint.Slides

Set pPT = New PowerPoint.Application
pPT.Visible = True

Set pPTopen = pPT.Presentations.Add

pPT.Activate
pPTopen.Slides.Add 1, ppLayoutBlank
pPTopen.Slides.Add 2, ppLayoutChart

End Sub

Private Sub Form_Unload(Cancel As Integer)
Set pPT = Nothing
Set pPTopen = Nothing
End Sub

   
Répondre à salhib
Posez votre question Répondre
Ils ont besoin de votre aide