求助！VBA xltoright 嵌套公式的问题

求助大神们！~

我是想引用worksheetfunciton里面的FORECAST.LINEAR公式：

1.从AJ9开始到达边界值进行求和

2. 从AQ9开始到达边界值进行求和

3. AP7的绝对值

代码如下：

Set a = Range("AJ9").End(xlToRight).Columns 
Set b = Range("AQ9").End(xlToRight).Columns
Set c = Range("$AP$7")
Range("W9").Value = "=Forecast.Linear(c,b, a)"引用FORECAST.LINEAR

但是当我使用AutoFill向下进行填充的时候：
Selection.AutoFill Destination:=Range("W9:W" & Range("A" & Rows.Count).End(xlUp).Row)

数值还是为“0”，也就是说只是复制了上一个单元格的值，下面的单元格并未参与运算。

请大神们帮忙看看呀，苦等~