Contenu récent par ASR

Bonjour Gérôme, essaie ce code sub collage() Dim ppt As PowerPoint.Application Dim Slides1 As PowerPoint.Slide Sheets("nom de la feuille").Select ActiveSheet.ChartObjects("nom du graphique").Activate ActiveChart.ChartArea.Copy ' Et on le colle dans la première diapositive de la...