[Excel] [VBA] Comment dessiner une ligne dans un graphique?

S'il vous plaît afficher cette image pour obtenir ma question clairement: enter image description here [Excel] [VBA] Comment dessiner une ligne dans un graphique?

Source

2011-04-15 hungbm06

Pourriez-vous essayer d'afficher un graphique de haute résolution ou élaborer sur votre question? La résolution de l'image ne rend pas votre question claire. – Jubbles

@Jubbles: J'ai mis à jour, s'il vous plaît aider! – hungbm06

Ajoutez simplement une deuxième série à l'intrigue, en utilisant les coordonnées requises. Vous avez seulement besoin de deux points. –

Sub Tester() 
    Dim s, d 

    d = #4/18/2011# * 1 ''a bit of a hack, since I could figure out how to plot a date directly 
    With ActiveSheet.ChartObjects("Chart 1").Chart 'adjust to suit 

     Set s = .SeriesCollection.NewSeries() 
     With s 
      .Name = "" 
      .XValues = Array(d, d) 
      .Values = Array(90, 0) 
      .MarkerStyle = xlMarkerStyleNone 
      .Border.Color = vbRed 
     End With 

    End With 

End Sub

Source

2011-04-15 20:53:57

Tim Wiliams: Ça ne marche pas, la ligne ne répond pas à mon requriment (c'est oblique) – hungbm06

@ hungbm06: Cela fonctionne bien! Juste essayé moi-même. @Tim: +1 pour m'avoir enseigné quelque chose que je ne connaissais pas, à savoir que vous pouvez alimenter les tableaux littéraux (et pas seulement les gammes) en XValues et Valeurs. –

@ hungbm06: Cela peut poser un problème avec vos paramètres régionaux. Au lieu de 'd = # 4/18/2011 # * 1', essayez' Dim d As Double 'suivi de 'd = DateSerial (2011, 4, 18)'. –

Si vous ne me dérange pas l'encombrement supplémentaire dans votre classeur, vous pouvez remplir quatre cellules avec les éléments suivants:

4/18/11  0 
4/18/11 90

Ajouter un nouvelle série au graphique avec ces données. Si vous ne voulez pas que la nouvelle série apparaisse dans la légende du graphique, double-cliquez sur le nom de la série rouge dans la légende et appuyez sur "Supprimer".

Source

2011-04-16 01:49:21 Excellll

La réponse de Excellll est incomplète. Si vous ajoutez simplement ces données à ce qui est évidemment un graphique LINE, il n'apparaîtra pas comme prévu. Vous devez convertir la série ajoutée en une série de graphiques XY (clic droit sur la série, Type de graphique).

En outre, votre ligne tombe à mi-chemin entre le 4/17 et le 4/18, vous devez donc utiliser midi le 4/17 comme valeur X, c'est-à-dire le 17/04/11 12:00.

Voici une série d'articles sur l'ajout de lignes vers les arbres Excel: http://peltiertech.com/Excel/Charts/AddLine.html

En outre, la suppression de l'entrée de la légende se fait en sélectionnant le texte de l'entrée de légende et en appuyant sur Suppr. Cela prend deux clics sur l'entrée de légende, pas un double clic.

Source

2011-04-16 22:06:55

Votre solution n'est correcte que si l'axe des x est la date, il ne va pas avec l'autre type d'axe des x – hungbm06

S'il s'agit d'un autre type d'axe, vous pouvez utiliser différentes valeurs X pour la ligne à ajouter. –

[Excel] [VBA] Comment dessiner une ligne dans un graphique?

Répondre

Questions connexes