Попытка изменить строку моих полных серий sourcedata rangey3.Мне хотелось бы, чтобы rangeInvNorm был обычной solid строкой, а rangeInvFore - пунктирным. 1004 *
безрезультатно, но оно работает для прогнозируемых значений.
Мой код:
Set rangexMonth = Worksheets("DATA").Range(Cells(lRow - 14, 1), Cells(lRow, 1))
' Inventory
Set rangeInvNorm = Worksheets("DATA").Range(Cells(lRow - 3, 7), Cells(lRow - 14, 7))
' Inventory Forecast
Set rangeInvFore = Worksheets("DATA").Range(Cells(lRow - 14, 12), Cells(lRow, 12))
Sheets("Report").Activate
ActiveSheet.Shapes.AddChart2(332, xlLineMarkers).Select
With ActiveChart
.SetSourceData Source:=rangeInvNorm
.FullSeriesCollection(1).Name = "Inventory"
.SeriesCollection(1).XValues = rangexMonth
.SeriesCollection.NewSeries
.SetElement (msoElementLegendBottom)
.ChartTitle.Delete
With .SeriesCollection(2)
.Name = "Inventory (Forecast)"
.Values = rangeInvFore
.Format.Line.Visible = msoTrue
.Format.Line.DashStyle = msoLineSysDot
.Format.Line.ForeColor.RGB = RGB(0, 189, 69)
.MarkerBackgroundColor = RGB(0, 189, 69)
End With
Я пытаюсь сделать синюю линию того же цвета, что и пунктирная линия: