Bonjour,  
 
Je suis en train de coder une macro qui copie-colle un tableau excel dans power-point...
 
Une semaine que j'essaye de comprendre pourquoi la première macro marche mais pas la deuxième !
 
Sub working()
 
Dim pptObjet As PowerPoint.Application
Dim pptTemplate As PowerPoint.Presentation
Dim pptPropal As PowerPoint.Presentation
 
Set pptObjet = CreateObject("PowerPoint.Application" )
Set pptTemplate = pptObjet.Presentations.Open(Intropath)
Set pptPropal = pptObjet.Presentations.Open(Destination)
 
Sheets("Book1" ).Activate
Range("B2:C5" ).Copy
pptObjet.ActiveWindow.View.Paste
 
End Sub
 
 
 
 
Sub failing()
 
Dim pptObjet As PowerPoint.Application
Dim pptTemplate As PowerPoint.Presentation
Dim pptPropal As PowerPoint.Presentation
 
Set pptObjet = CreateObject("PowerPoint.Application" )
Set pptPropal = pptObjet.Presentations.Open(Destination)
Set pptTemplate = pptObjet.Presentations.Open(Intropath)
 
Sheets("Book1" ).Activate
Range("B2:C5" ).Copy
pptObjet.ActiveWindow.View.Paste  
 
End Sub
 
Erreur  : "View (unknown member) : Invalid request. Clipboard is empty or contains data which may not be pasted here"
 
 

Tu as un slide dans ta présentation qui se trouve ici: Intropath?
Ou, quand tu ouvres cette présentation, quel est l’élément sélectionné? où se trouve le curseur? etc?
Quand tu ouvres l'autre fichier, est ce que tu es dans une situation similaire? sélection faite? curseur d’édition dans une boite? etc...

Visiblement, il faut faire

avant

Et l'inverse ne fonctionne pas...  
 
Il faudrait voir les ppt pour mieux comprendre, mais je suppose que tu veux copier ton Excel dans "Destination" et non dans "Template".
Template est peut-être un fichier protégé ou quelque chose comme ça...