☰

更改 Excel 图表中的数据系列线宽（一次更改多条）

tag-icon • tag-icon microsoft-excel formatting microsoft-excel-2010 charts
更改 Excel 图表中的数据系列线宽（一次更改多条）

有没有办法可以一次编辑 Excel 折线图上所有线条的粗细？

我有一张包含大约 50 个数据系列的图表，如果要逐一查看所有数据系列并单独更改权重，那就太多了，而且如果线条更细，就很难看到数据，这会更容易一些）。我看不到多选它们的方法，这看起来有点糟糕。

编辑：我最终用以下代码让它工作了（在学习了一点 VB 之后）。不过这似乎对图表的可读性没有多大帮助！Chris 帮我解决了这个问题，所以我会给他打勾。

Sub onepxlines()
        With Selection
            MsgBox ("Selection: " & TypeName(Selection))
            If TypeName(Selection) = "ChartArea" Then
                Dim area As ChartArea
                Set area = Selection

                MsgBox ("Area parent: " & TypeName(area.Parent))

                If TypeName(area.Parent) = "Chart" Then
                    Dim chart As chart
                    Set chart = area.Parent
                    Dim srs As Series

                    For Each srs In chart.SeriesCollection
                        srs.Format.Line.Weight = 1.5
                    Next
                End If
            End If
        End With
End Sub

答案1

最简单的方法是编写一个快速宏，例如

Sub SetWeights()
    Dim srs As Series
    For Each srs In ActiveSheet.ChartObjects("Chart 1").Chart.SeriesCollection
        srs.Format.Line.Weight = 0.75
    Next
End Sub

答案2

这是 Chris 的答案的更适合复制粘贴的版本：

Sub SetWeights()
    Dim srs As Series
    For Each srs In ActiveChart.SeriesCollection
        srs.Format.Line.Weight = 0.25
    Next
End Sub

只需选择图表并运行宏。

答案3

增强功能：创建一个指向电子表格中单元格的 VB 变量 (LineWT)。然后将“Format.Line.Weight = 0.25”改为 LineWT，改为 0.25。然后，您可以通过在电子表格中更改线宽并单击宏按钮来更改线宽。您可以使用类似的代码设置带有指向电子表格的指针的 X/Y 轴名称。

答案4

我认为您不能同时选择多条线。最简单的方法可能是更改一条线，然后依次选择每条线，然后使用 Ctrl-Y 浏览并重新更改线宽。

相关内容