[Excel] [VBA]如何在图形中绘制一条线？

请查看此图片让我清楚的问题： enter image description here [Excel] [VBA]如何在图形中绘制一条线？

2011-04-15 hungbm06

您可以尝试发布更高分辨率的图形或详细说明您的问题吗？图像的分辨率不会让你的问题变得清晰。 – Jubbles 2011-04-15 15:05:24

@Jubbles：我更新了，请帮忙！ – hungbm06 2011-04-15 16:11:15

只需使用所需的坐标将第二个系列添加到绘图。你只需要两点。 – 2011-04-15 16:30:16

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

来源

2011-04-15 20:53:57

如果你不介意工作簿中的额外的混乱，你可以填写四个单元有以下：

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

添加有了这些数据的新图表。如果您不希望新图像出现在图表图例中，请双击图例中的红色系列名称，然后按“删除”。

来源

2011-04-16 01:49:21 Excellll

Excellll的答案不完整。如果您只是简单地将这些数据添加到LINE图表中，那么它将不会显示在预期的位置。您必须将添加的系列转换为XY图表系列（右键单击系列，图表类型）。

此外，您的线路在4/17和4/18之间，因此您需要在4/17上使用中午作为X值，即4/17/11 12:00。

下面是一组有关添加行Excel图表的文章： http://peltiertech.com/Excel/Charts/AddLine.html

而且，删除图例项通过选择图例项的文本，并按下Delete键来完成。这需要对图例条目进行两次单击，而不是双击。

来源

2011-04-16 22:06:55

[Excel] [VBA]如何在图形中绘制一条线？

回答

相关问题