excel 气泡图和折线图组合
excel bubble chart and line chart combined
下面有一个table
我想绘制折线图来显示价格随日期的变化,还想绘制气泡图来显示每个 date.The 气泡大小取决于交易量的交易量。气泡的位置取决于日期和价格,因此它的中心在这条线上。 Excel 中的操作方法。这是一个例子,我通过手动叠加两个图表设法得到但它不是很精确。
您可以使用以下代码根据值编辑标记的大小。您可能必须在虚拟列中复制这些值并将其调整为合理的标记大小,然后 hide/delete 它。
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
下面有一个table
我想绘制折线图来显示价格随日期的变化,还想绘制气泡图来显示每个 date.The 气泡大小取决于交易量的交易量。气泡的位置取决于日期和价格,因此它的中心在这条线上。 Excel 中的操作方法。这是一个例子,我通过手动叠加两个图表设法得到但它不是很精确。
您可以使用以下代码根据值编辑标记的大小。您可能必须在虚拟列中复制这些值并将其调整为合理的标记大小,然后 hide/delete 它。
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