VBA宏自动填充单元格

Question

我正在尝试找到一个简单的自动填充解决方案，以便在插入新行后将单元格 C3 中的公式复制到 C2 中。这是我认为可行的方法:

Sub AutoFill()
    Set SourceRange = Worksheets("Sheet 1").Range("C3")
    Set fillRange = Worksheets("Sheet 1").Range("C2")
    SourceRange.AutoFill Destination:=fillRange
End Sub

基本上，在 C3 中(以及第 3 行之后 C 列中的每个单元格)都有一个平均函数，它需要前 20 天并创建一个平均值。我试图让宏在每次放入新行时输入该公式(我有输入新行的代码，它只是在新行进入后不会应用该函数)

Answer 1

The cells to be filled. The destination must include the source range.

引自 MSDN .

所以试试:

Set SourceRange = Worksheets("Sheet 1").Range("C3")
Set fillRange = Worksheets("Sheet 1").Range("C2")
SourceRange.AutoFill Destination:=Range(fillRange, SourceRange)

另一个注意事项是如果要在其间插入行，请使用命名范围。