Excel VBA - How do you set line style for chart series?

后端 未结 3 1448
半阙折子戏
半阙折子戏 2021-01-21 04:17

I would like the plot lines in a chart to be either solid, circle dot, or square dot based upon a certain criteria specified by the user. I can successfully set the line color

3条回答
  •  借酒劲吻你
    2021-01-21 04:48

    If you have a line chart, I ended up creating a switch statement because I couldn't figure out how to make an array of "Name" variables. See list of line types here

    For j = i To num_lines_to_plot
            count = count + 1
            ActiveChart.SeriesCollection.NewSeries
            With ActiveChart.SeriesCollection(j)
                .Name = _
                    "='"**... (you'll need to fill this in)**
                'create gradient
                .Format.Line.ForeColor.RGB = RGB(255, 20 * count, 0)
                'modify linetype
                If count > 4 Then
                    line_type = count Mod 4
                Else
                    line_type = count
                End If
    
                Select Case line_type
                    Case Is = 1
                        .Format.Line.DashStyle = msoLineSolid
                    Case Is = 2
                        .Format.Line.DashStyle = msoLineSquareDot
                    Case Is = 3
                        .Format.Line.DashStyle = msoLineDash
                    Case Is = 4
                        .Format.Line.DashStyle = msoLineLongDash
                    End Select
    
            End With
        Next
    

提交回复
热议问题