excel - 从图表中提取R平方到单元格中

我有一个Excel散点图，具有趋势线和R2值。

如何将趋势线的R平方值返回到变量？

我想：

x = ActiveChart.SeriesCollection(1).Trendlines(1).Datalabel.Value

但这不起作用。

我知道我们可以直接使用RSQ和LINEST进行计算，但是当采用截距进行截取时，零值图表与通过LINEST计算得出的图表并不相同。我想记录图表中的值。

最佳答案

你可以试试：

x = Val (Split(ActiveChart.SeriesCollection(1).Trendlines(1).DataLabel.Text, "=")(1))

如果还显示了公式，请使用第三个元素（id 2）

x = Val (Split(ActiveChart.SeriesCollection(1).Trendlines(1).DataLabel.Text, "=")(2))

要绝对确定位置，可以使用以下方法：

Public Function GetR2() As Single

    Dim sArray() As String

    sArray = Split(ActiveChart.SeriesCollection(1).Trendlines(1).DataLabel.Text, "=")

    GetR2 = CSng(sArray(UBound(sArray)))

End Function

如果您要坚持一条路线，那么这在两种情况下都适用

x = Val（拆分（ActiveChart.SeriesCollection（1）.Trendlines（1）.DataLabel.Text，“R²=”）（1））

关于excel - 从图表中提取R平方到单元格中，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/32777088/