如何使用VBA在Excel中自动填充单元格？

Question

我在第一列中有一些数据,之后有一些计算字段,我想用第一行中的相同规则自动填充其余行.

输入/计算数据的总行数,列数是已知的,我将非常感谢这个数据的工作示例:

  |  A  |  B  |    C   |    D   |      E     |
----------------------------------------------
1 |  3  |  1  | =A1+B1 | =A1*B1 | =sum(C1:D1)|
2 |  4  |  4  |        |        |            |
3 |  5  | 23  |        |        |            |
4 | 42  |  4  |        |        |            |
5 |  7  |  4  |        |        |            |

实际数据通常有10K +行和30+列.当我尝试手动执行此操作时有时会收到错误Selection is too large.我告诉这个,因为通用解决方案也可能无法使用VBA,但如果我知道如何自动填充此示例,我会在必要时按列进行.Excel的版本是2000,这不是我的错:)

Answer 1

sub copydown()
    Range("c1:e" & Range("a" & activesheet.rows.count).End(xlUp).Row).FillDown
end sub