Discussion :

[Mando]

Bonjour à tous
Alors, voila, je voudrai, à partir d'un fichier excel, ouvrir une presentation powerpoint, et mettre à jour ses liaisons, soit de maniere automatique ( ce serait le mieux), soit par boite de dialogue proprsant la mise à jour des liaisons qui se lance normalement à l'ouverture du ppt.
Hors, pour l'instant, j'arrive bien à ouvrir le fichier powerpoint, mais rien d'autre ne se passe. Ni maj auto, ni fenetre de dialogue.
Voila un extrait du code que j'utilise :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
 
Dim ppt As PowerPoint.Application
 
Set ppt = CreateObject("PowerPoint.Application")
 
Dim Pres As PowerPoint.Presentation
 
...
 
Set Pres = ppt.Presentations.Open(Filename:=FichierSortie)

Voila, si quelqu'un peut m'aider, ce serait bien sympa

Merci d'avance

[SfJ5Rpw8]

peu être , aprés l'ouverture :

Code :

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

pres.UpdateLinks