📅  最后修改于: 2023-12-03 15:37:20.020000             🧑  作者: Mango
很多时候,在 Excel 中需要将多个数据集绘制在同一张图表上,以便于比较不同的数据。本篇将介绍如何在 Excel 中实现这一操作。
选中需要绘制的数据集,并用图表工具创建一个图表。
在数据集中添加需要绘制的数据。
在图表中右键单击,选择“Select Data”。
在“Select Data Source”弹窗中,点击“Add”按钮。
在“Edit Series”弹窗中填写数据集的“Series Name”、X轴数据和Y轴数据。
点击“OK”按钮,重复步骤5,直至添加所有需要绘制的数据集。
点击“OK”按钮提交更改,即可在同一张图表上绘制多个数据集。
Sub AddSeriesToChart()
Dim cht As Chart
Set cht = ActiveSheet.ChartObjects("Chart 1").Chart
'获取数据
Dim dataRange As Range
Set dataRange = Range("B2:C10")
'添加一个系列
Dim series1 As Series
Set series1 = cht.SeriesCollection.NewSeries
series1.Name = "数据1"
series1.Values = dataRange.Columns(2)
series1.XValues = dataRange.Columns(1)
'添加第二个系列
Dim series2 As Series
Set series2 = cht.SeriesCollection.NewSeries
series2.Name = "数据2"
series2.Values = dataRange.Columns(3)
series2.XValues = dataRange.Columns(1)
End Sub
本示例演示了如何使用VBA在同一张图表上绘制多个数据集。代码中,我们首先获取数据,然后通过添加系列的方式将其添加到图表中。通过修改系列的名称、值和X轴值即可实现多个数据集的绘制。