Pb pour copier un graph sans liaisons

[oslo71]

Bonjour à tous,

J'ai un problème que je n'arrive pas à résoudre.
Sur mon fichier, j'ai une feuille avec différents petits graphs.
Je voudrais créer une copie de cette feuille dans un autre fichier ("déplacer ou copier", "créer une copie", "dans nouveau classeur")
Je voudrais que cette nouvelle feuille copiée soit sans liaisons, car je veux garder une "photo" de ces graphs !!
Comment faire ? 😕

Si un expert pouvait m'aider !! je vous serais très reconnaissant.
Merci à tous.
Cordialement.

 

[oslo71]

Re : Pb pour copier un graph sans liaisons

Merci Jean-Marcel,
Cela répond effectivement à ma question.

J'aimerais aller un peu plus loin, me serait-il possible avec un code macro de copier ma feuille de graph (que je veux garder) et la créer automatiquement sur un autre classeur dans une nouvelle feuille (sans les liaisons)

Merci pour vos réponses si possible, mais ne perdez pas trop de temps sur ce pb, je culpabilise un peu !!!!
Cordialement.

 

[Gael]

Re : Pb pour copier un graph sans liaisons

Bonjour Oslo71, bonjour Jean-Marcel,

Une autre solution est de copier l'image du graphique et non pas le graphique lui-même:

* Sélectionne le graphique à copier
* Clique sur le menu "Edition" en appuyant sur la touche "MAJ"
* Choisis "Copier l'image" et garde les options "Telle qu'à l'écran" et "Mode image"
* puis coller là où tu le souhaites.

Tu peux sélectionner plusieurs graphiques en maintenant la touche "MAJ" pendant les sélections mais le résultat sera une image globale (tu ne pourras pas déplacer séparément les différents graphiques, leur disposition sera fixe).

@+

Gaël

 

[oslo71]

Re : Pb pour copier un graph sans liaisons

Bonjour Gael,

Bon à savoir... Je ne connaissais pas non plus cette solution intéressante.
Malheureusement ça ne va pas pour mon cas, car j'ai une feuille de 10 petits graphs à copier et même si je copie toute la feuille, je ne peux pas en type "photo" la mettre en page pour l'imprimer correctement. Mais merci pour ce truc.
Cordialement.

 

[Gael]

Re : Pb pour copier un graph sans liaisons

Re,

Eventuellement, une petite macro qui copie un à un tous les graphiques de la feuille active dans une autre feuille.

Après copie, tu peux agencer les images comme souhaité. Comme il n'y a pas de position précisée pour chaque image, elles peuvent se retrouver empilées mais tu pourras les déplacer facilement.

Sub Copiegraph()
'
'
Dim Graph As ChartObject
'
For Each Graph In ActiveSheet.ChartObjects
    Graph.Activate
    ActiveChart.ChartArea.Select
    ActiveChart.CopyPicture Appearance:=xlScreen, Size:=xlScreen, Format:=xlPicture
    Sheets("Feuil3").Paste
Next
End Sub

@+

Gael

 

[oslo71]

Re : Pb pour copier un graph sans liaisons

Gael,
Merci de ton aide, j'ai fait la macro mais malheureusement elle ne marche pas, elle ne me met pas en erreur mais ne fait rien, elle ne copie pas mes graphs.
Cordialement.

 

[Gael]

Re : Pb pour copier un graph sans liaisons

Rebonjour à tous,

Et un fichier joint avec la macro de recopie en intégrant les propositions de Jean-Marcel.

ça, c'est de la synergie et dutravail d'équipe 🙂

@+

Gael

 

[oslo71]

Re : Pb pour copier un graph sans liaisons

C'est du bon travail tout ça..
Un grand merci à vous deux.
Cordialement.