vba - 如何使用两个使用 vba 的工作表生成图形？

Question

我在excel中有两个工作表。我想使用 vba 绘制带有两个工作表数据的图形。请任何人帮助我

Range("G7:G11,A7:A11").Select
Range("A7").Activate
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlXYScatterSmoothNoMarkers
ActiveChart.SetSourceData _  
    Source:=Range("Sheet1!$G$7:$G$11,Sheet1!$A$7:$A$11,sheet2!$D$4:$D$303,sheet2!$C$4:$C$303")

Answer 1

你需要做这个零碎的。创建没有系列的图表，然后逐个添加系列（将其放入循环中）：

With ActiveChart.SeriesCollection
    With .NewSeries
        .Values = {some range reference}
        .XValues = {some range reference}
        .Name = {range reference or string}
    End With
End With

每个范围可以位于不同的工作表上，但您不能将一个范围拆分到多个工作表上。例如，一个系列的 X 和 Y 值可以取自不同的工作表，但所有 X 值必须来自一张工作表，所有 Y 值必须来自一张工作表，但不一定与 X 值来自同一张工作表。