1

我在下面有一张桌子

在此处输入图像描述

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

在此处输入图像描述

4

1 回答 1

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
于 2018-11-02T18:51:46.617 回答