Couper le lien entre graphique et ses données

XanorK

XLDnaute Occasionnel
[Résolu]Couper le lien entre graphique et ses données

Bonsoir le forum,


J'ai une macro qui me sort un graphique a partir de données Excel. Jusqu'a rien d'extraordinaire.
Le pb : J'ai maintenant besoin de modifier ses données apres avoir generer le graphique mais SANS que celui-ci ne soit impacté.

Je ne trouve pas la solution. Est-ce possible, j'imagine avec les talents du coin.


XanorK
 
Dernière édition:

CB60

XLDnaute Barbatruc
Re : Couper le lien entre graphique et ses données

Bonjour le forum, Xanork et Michelxld,
Peut être de cette façon , en copiant le graphique en tant qu'image sur une autre feuille.Jai mis un bouton sur la feuille avec une macro.
Bruno
 

Pièces jointes

  • GGanttDecaletImage.zip
    11.2 KB · Affichages: 47

myDearFriend!

XLDnaute Barbatruc
Re : Couper le lien entre graphique et ses données

Bonjour XanorK, MichelXLD, CB60,

En reprenant le classeur et la méthode de CB60 (bravo au passage !), on peut faire un peu plus court et remplaçer directement le graph dans la feuille :

Code:
[SIZE=2]Sub FigerGraph()
      [COLOR=navy]With[/COLOR] ActiveSheet
            .Chart[COLOR=navy]Object[/COLOR]s("Graphique 8").CopyPicture
            .Chart[COLOR=navy]Object[/COLOR]s("Graphique 8").Delete
            .Paste Destination:=.Range("H1")
      [COLOR=navy]End With
End[/COLOR] Sub[/SIZE]
Cordialement,
 

Pièces jointes

  • FigerGraph.zip
    9.6 KB · Affichages: 42

Ti_

Nous a quitté
Repose en paix
Re : Couper le lien entre graphique et ses données

Salut

Pour en remettre une petite couche, quelques modifs mineures à la macro de Didier. C'est vraiment pour chipoter !

Code:
Sub FigerGraph()
Dim Cel As Range
  With ActiveSheet
    With .ChartObjects(1)
      Set Cel = .TopLeftCell
      .CopyPicture
      .Delete
    End With
    .Paste Cel
  End With
End Sub
 

CB60

XLDnaute Barbatruc
Re : Couper le lien entre graphique et ses données

re,
merci MDF et Ti pour l'adaptation et la simplification, le seul bémol que je mettrais et que sur ma solution je peux toujours utiliser le graph avec les nouvelles valeurs.
Bruno
 

chris

XLDnaute Barbatruc
Re : Couper le lien entre graphique et ses données

Bonjour

CB60 les + grands se penchent sur ton graphique, MicheXLD, MDF et TI !
waouh quel fil ! Je les salue bien chaleureusement au passage.

Je comprends que tu veuilles garder le beurre et l'argent du beurre !

J'y ai même récupéré la crémière : à partir de la solution de MichelXLD j'ai même compris qu'on peut aussi créer une série de toutes pièces en reprenant la syntaxe obtenue après F9. Une bonne solution pour placer une ligne droite, un seuil par exemple, sans créer la série dans les données source d'un graph.

Bon dimanche à tous
 

CB60

XLDnaute Barbatruc
Re : Couper le lien entre graphique et ses données

Re
Chris tu peu mettre un exemple car je n'ai pas tout compris.
Et pour moi c'est plus simple de pouvoir décortiquer un fichier pour pouvoir comprendre ( les neuronnes en vacance)
Bruno
 

chris

XLDnaute Barbatruc
Re : Couper le lien entre graphique et ses données

Re
Quand tu utilises F9 cela remplace la partie cellules sources des valeurs de la série
par exemple CA!$B$4:$E$4
par leur valeurs : {5001.6745.7258.5104}

Donc si tu veux ajouter une courbe en ligne droite dans ton graphique pour indiquer une seuil de 3500 par exemple
  • tu utilises le Menu Graphique, Données sources
  • dans l'onglet Série tu cliques sur Ajouter, tu donnes un nom (Seuil par exemple), tu peux sélectionner les cellules de titres communs à toutes les séries pour la partie Etiquettes des abscisses (elle sdevraient déjà l'être), et pour les valeurs tu mets
    ={3500.3500.3500.3500}
    (autant de 3500 que de données dans les autres séries et OK
  • si nécessaire tu sélectionnes cette nouvelle série, clic droite, Type courbe.
Et voilà.
XLD c'est comme les trains, une réponse peut en cacher une autre !:)
 

Discussions similaires

Statistiques des forums

Discussions
312 753
Messages
2 091 672
Membres
105 041
dernier inscrit
CHERRIERE