Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Importer graphique de classeur fermé

Pierre31

XLDnaute Junior
Bonjour à toutes et tous,

En VBA, comment peut-on à partir d'un classeur ouvert importer un graphique d'un autre classeur qui est fermé ?

D'avance merci pour vos réponses.

Cordialement

Pierre
 

Pierre31

XLDnaute Junior
Bonjour tototiti2008,

Merci pour ta réponse.

j' ai fini par trouver la solution, la voici si dessous, je l'ai un petit peu documenté.
Je lance la macro suivante à partir d'un bouton.

Private Sub CommandButton1_Click()


Application.DisplayAlerts = False

Workbooks.Open FileName:= _
"E:\DPR\MGR\LOM\GMAO\Budget\FG2009-9-Ligne221 C645.xls" 'Le fichier ou se trouve le graphique à copier
Sheets("Global").Activate 'La feuille sur laquelleest le graphique à copier
ActiveSheet.DrawingObjects.Select 'L'objet graphique à copier
Selection.Copy

ActiveWorkbook.Close 'Fermeture du fichier source

Sheets("GraphCC").Activate 'Activation de la feuille de destination du fichier ouvert

Range("A1").Activate

ActiveSheet.Paste 'La copie du graphique

'**** Et la suite que vous souhaitez donner ..............


End Sub

Cordialement

Pierre
 

Discussions similaires

Réponses
7
Affichages
401
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…