Mixer VBA Powerpoint et VBA WORD

[trouver]

Je souhaite construire un organigramme Powerpoint à partir d'une analyse faite en VBA WORD, donc rester dans le code VBA WORD
Il semble que VBA WORD ne connaisse pas les objets et méthodes Powerpoint ni Excel d'ailleurs (je me trompe certainement...)
Pourtant, à l'inverse, dans VBA powerpoint je peux utiliser des objets et méthodes Excel, par exemple :
Dim struct_PGM As Excel.Worksheet
est accepté dans VBA powerpoint et rejeté dans VBA word

Par contre dans VBA Word :

Code :

1
2
Set ppApp = CreateObject("Powerpoint.Application")
    Set newp = ppApp.Presentations.Add

est accepté, mais plus loin

Code :

   ActivePresentation.Slides.Add i_diap, ppLayoutBlank

n'est pas reconnu.

Comment faire pour mixer les deux ?

[Heureux-oli]

J'ai pas bien compris où tu rencontre un problème.
Si tu déclare les références dans ton projet, tu peux utiliser les objets d'un autre logiciel dans ton code.


En PPT :

Code :

1
2
3
 
Dim wApp as New Word.Application
wApp.Documents.Add

Va fonctionner.

[trouver]

Oui, merci Heureux-oli, ça marche ! il faut donc systématiquement faire référence à la racine déclarée, ici dans ton exemple wApp.

Concernant la déclaration Excel dans VBA Powerpoint, je ne m'explique pas pourquoi la même macro ci-dessous est acceptée dans un module et pas dans un autre ("Type défini par l'utilisateur non défini") ?!

Code :

1
2
3
Sub Macro51()
    Dim struct_PGM As Excel.Worksheet
End Sub

(j'ai fait exprès de ne mettre que la ligne Dim)

[Heureux-oli]

Va voir dans outils, références si Excel est coché, mais il faut que l'application soit déclarée, peut-être l'est-elle en public à un autre endroit ?

Avec juste un morceau de code hors de son contexte, il est difficile de répondre.