VBA設定圖表線條粗細
當圖表線條太粗/細時，需要右鍵點選線條-框線寬度做調整，但當數列很多時，一個一個調整很費時，以下帶你使用「VBA設定圖表線條粗細」。
輸入巨集
※輸入以下指令※
Sub 設定圖表線條粗細()
Dim i As Integer
With ActiveSheet.ChartObjects(1).Chart.SeriesCollection
For i = 1 To .Count
.Item(i).Format.Line.Weight = 6
Next i
End With
End Sub
執行巨集
點選「開發人員」-「 巨集」或按下「Ctrl」+「F8」快捷鍵，並「執行」巨集。
執行後則快速將圖表各數列線條粗細設為「6」pt。
語法說明
Dim i As Integer
‘宣告變數「i」型態為「整數」
ActiveSheet.ChartObjects
‘當前工作表的第一個圖表物件
.Chart
‘圖表物件的屬性
.SeriesCollection
‘圖表內的數據系列集合
For i = 1 To .Count
‘「i」從「1」開始到「數據系列總數」，進行以下處理。
.Item(i).Format.Line.Weight = 6
‘第「i」個數據系列的線條粗細設定為「6」