如何将xlMarkerStyles应用于Excel vba中的图表图表,而无需直接使用xlMarkerStyleAutomatic

我有斧头,散点图连线从一个来源点。 我有1和8行之间,我需要将MarkerStyle分配给每一行。 由于线不固定,取决于当前的数据,我不能说哪些线路在那里。

一般来说,我可以分配

ActiveChart.FullSeriesCollection(i).MarkerStyle = xlMarkerStyleAutomatic 

但是,这也分配不需要/不可读的标记。 那么我可以用我想要的Markerstyles创build一个Collection,然后指定它吗?

我testing过了

 Dim colMarker As Collection Set colMarker = New Collection colMarker.Add "xlMarkerStyleCircle" colMarker.Add "xlMarkerStyleSquare" colMarker.Add "xlMarkerStyleTriangle" With ActiveChart.FullSeriesCollection(i) .MarkerStyle = colMarker(1) End With 

但错误信息是wrong type

我需要什么types?

感谢Kaz

您可以分别设置每个系列的标记样式:

 Dim sa Series s = ActiveChart.SeriesCollection.NewSeries s.MarkerStyle = xlMarkerStyleCircle 

编辑:

要分配不同的标记样式,请使用您build议的方法,但是在向样式中添加样式时,应该这样做:

 colMarker.Add xlMarkerStyleDiamond 

即不带引号。