我有420列，每列都有一个唯一的公式，该公式随行号而变化，总共大约有1500行。
由于我不明白的原因，当我刷新数据查询（从sharepoint列表）时，每个forumla中的行号引用并不总是正确更新。
我可以写一个VBA脚本来自动填充顶部单元格的每一列来解决这个问题;

Range("A2").Select
Selection.AutoFill Destination:=Range("A2:A1555")
Range("B2").Select
Selection.AutoFill Destination:=Range("B2:B1555")

但这意味着重复直到PD列，大量的输入。
有没有更动态的方法来做到这一点？列数不应该改变，但总行数可能会改变。