Discussion :

[coritani]

Bonjour,

J'ai créé une importante macro qui génère à partir d'excel une présentation Power Point. Cette macro fonctionnait bien avant et pour une raison mystérieuse, parfois elle ne marche plus... Mais parfois elle remarche ! Et puis ne remarche plus...

Je créé d'abord un PPT vierge et ensuite je colle à l'intérieur plusieurs PPT pré-enregistrés dans un dossier :

Je vous ai fait une version très courte :

Dans un module Excel 2010 :

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
Sub Start()
 
Public pptObjet As PowerPoint.Application 
Public pptTaux As PowerPoint.Presentation 'le fichier PPT vierge
Public PptTemplate As PowerPoint.Presentation 'le PPT à coller dans le PPT vierge
 
Set pptObjet = CreateObject("PowerPoint.Application")
pptObjet.Visible = True 
 
Set pptTaux = pptObjet.Presentations.Open(PropalPath)
Set PptTemplate = pptObjet.Presentations.Open(IntroPath, ReadOnly:=True, withwindow:=msoFalse)
 
CopyPaste PptTemplate, PptTaux 'autre sub qui copie la template et la colle dans la presentation vierge
PptTemplate.Close 'ferme la template
 
End Sub

Cette macro fonctionne correctement 75% du temps, mais sinon j'ai une erreur sur cette ligne :

Code :

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

Set pptTaux = pptObjet.Presentations.Open(PropalPath)

Erreur d'éxécution '-2147467259 (80004005)':
PowerPoint could not open the file

Cela fait un an que j'ai ce problème et je n'ai rien trouvé...

Je me souviendrai toute ma vie de celui qui m'aidera à résoudre ce problème !!

Merci par avance,

Coritani

[informatiz67000]

Impressionnante ta Macro, je n'en ai jamais utilisée pour Powerpoint. Je suis preneur de la solution à ce niveau... Et désolé pour la fausse joie

[Obsidian]

Bonsoir,

Erreur d'éxécution '-2147467259 (80004005)':
PowerPoint could not open the file

Cela signifie littéralement « PowerPoint n'a pas pu ouvrir le fichier ». Donc visiblement, le problème est extérieur à ta macro (ce qui expliquerait pourquoi elle ait cessé de fonctionner sans que l'on ne change quoi que ce soit) et peut-être même extérieur à Powerpoint.

Il faudrait voir sur quoi pointe « IntroPath ». Il se peut que ce soit un fichier sur un lecteur réseau parfois indisponible, il se peut que ce soit un raccourci vers un fichier qui, lui, a été effacé ou même encore qu'une autre application ait posé un verrou sur le fichier convoité.