以100％繪製的圖表線

Question

我一直在試圖找出幾個小時。如果答案已經存在，請提前道歉，但我還沒有找到答案。

我有一個圖表，其中Y軸是100％的最大值。但是，基於數據的X軸是可變的。例如，X軸可以達到+ 300％。

我想在X軸爲100％的圖表上繪製一條垂線，因此對於超過100％的用戶來說更明顯。

幫助表示讚賞！

Excel VBA技能通常很強大，但在涉及圖表操作方面很薄弱。

Answer 1

Sub AddLine() 

Dim cht As Chart, s As Series 

    Set cht = ActiveSheet.ChartObjects(1).Chart 

    Set s = cht.SeriesCollection.NewSeries 
    With s 
     .XValues = Array(100, 100) 
     .Values = Array(0, 100) 
     .Name = "100%" 
     .MarkerStyle = -4142 
     With .Format.Line 
      .Weight = 1 
      .ForeColor.RGB = RGB(255, 0, 0) 
     End With 
    End With 

End Sub