excel气泡图和折线图相结合

时间:2018-11-02 17:15:07

标签: excel linechart bubble-chart combinedchart

我在下面有一张桌子

enter image description here

我想绘制折线图以显示价格随日期的变化,并绘制一个气泡图以显示每个日期的交易量。气泡的大小取决于交易量。气泡的位置取决于日期和价格,因此气泡的中心位于线上。如何在Excel中执行此操作。这是一个示例,我设法通过手动叠加两个图表来实现,但这不是很精确。

enter image description here

1 个答案:

答案 0 :(得分:0)

您可以使用以下代码根据值来编辑标记的大小。您可能必须在虚拟列中将值复制并调整为合理的标记大小,然后再隐藏/删除它。

Sub ChangeMarkerSize()
    n = 10 'Number of Points
    For i = 1 To 10
        ThisWorkbook.Sheets("Sheet1").ChartObjects("Chart 1").Activate
        With ActiveChart.FullSeriesCollection(1).Points(i)
            .MarkerStyle = 8
            .MarkerSize = ThisWorkbook.Sheets("Sheet1").Range("C" & i).Value * 0.1
        End With
    Next
End Sub