从活动单元自动填充到26列

我有一个公式的单元格。 我想从该单元格自动填充到固定数量的列。

我正在尝试这样的事情：

Selection.AutoFill Destination:=Range("RC:RC[+26]"), Type:=xlFillDefault 

但不能正确。

谢谢！

Answer 1

尝试在Range命令内使用Offset ：

 Selection.AutoFill Destination:=range(activecell, activecell.Offset(0,26)), Type:=xlFillDefault 

RC风格用于公式，但我从来没有见过它在一个Range对象内使用。

Answer 2

你可以使用Resize ：

 With ThisWorkbook.Worksheets("Sheet1") .Range("A2").AutoFill Destination:=.Range("A2").Resize(, 26), Type:=xlFillDefault End With 

这将填充A2：Z2的公式。