標題: 請問如何用vb取得趨勢線的公式(F8逐步執行是可以,但按F5就沒反應) [打印本頁]

---

作者: jysun1    時間: 2018-7-3 22:44     標題: 請問如何用vb取得趨勢線的公式(F8逐步執行是可以,但按F5就沒反應)

[attach]28913[/attach]
Range("C4:C7").Select
    ActiveSheet.Shapes.AddChart2(332, xlLineMarkers).Select
    ActiveChart.SetSourceData Source:=Range("工作表1!$C$4:$C$7")
    ActiveChart.FullSeriesCollection(1).Select
    ActiveChart.FullSeriesCollection(1).Trendlines.Add
    ActiveChart.FullSeriesCollection(1).Trendlines(1).Select
    With Selection
        .Type = xlPolynomial
        .Order = 2
    End With
    Selection.DisplayEquation = True
    Range("A1") = ActiveChart.FullSeriesCollection(1).Trendlines(1).DataLabel.Text
  [attach]28914[/attach]

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)