VBA excel-powerpoint

Bonjour,

je souhaite modifier la mise en forme de mon tableau dans le powerpoint (largeur et hauteur) mais je bloque à ce niveau la :

=> .ActivePresentation.slides(1).Shapes.pastesplecial (pppastedefaut, link:=True).Select

Pouvez-vous m'aider ?

D'avance, merci

31powerpointvba.pptx (42.23 Ko)

Bonjour,

et qu'est censé provoquer cette ligne de code ? je comprends pas tu effectue un collage et une sélection en même temps ?

j'ai voulu sélectionner le tableau dans le powerpoint pour pouvoir modifier la mise en forme.

Le programe n'accepte pas link:=True, pourtant essentiel pour conserver la mise en forme du forme dans le slide.

Sub VVV()

Windows("Fichier excel macro.xlsm").Activate

Sheets("TRAME").Select

Range("B4:H14").Select

Selection.Copy

Set objApp = CreateObject("PowerPoint.Application")

With objApp

.Activate

.Presentations.Open Filename:="C:\Documents\PowerPointVBA.pptx", ReadOnly:=msoFalse

.ActivePresentation.slides(1).Select

.ActivePresentation.slides(1).Shapes.PasteSpecial(ppPasteDefault, link:=True).Select

End With

End Sub

Rechercher des sujets similaires à "vba powerpoint"