式设置一单元格范围的(Set formula to a range of cells)

这是我所想要做的简单的演示。 我想将公式设置为单元格范围（例如，C1到C10）。

Range("C1").Formula = "=A1+B1"

但如何让公式使用动态细胞是这样的：

Range("C1:C10").Formula = "=Ax+Bx"

因此在现实中很是喜欢，

C1 = A1 + B1
C2 = A2 + B2
C3 = A3 + B3
C4 = A4 + B4
C5 = A5 + B5
...
C10 = A10 + B10

如何改变RHS该公式，使上述工作： Range("C1:C10").Formula = "=Ax+Bx"

Answer 1:

我将更新C1的公式。 然后，从公式C1复制并粘贴至C10 ...

不知道一个更优雅的解决方案

Range("C1").Formula = "=A1+B1"
Range("C1").Copy
Range("C1:C10").Pastespecial(XlPasteall)

Answer 2:

Range("C1:C10").Formula = "=A1+B1"

就那么简单。

它自动填充（FillDown）与式的范围内。

Answer 3:

我觉得这是最简单的答案可能：2层的线条和非常理解。 它模拟拖动穿过一单元格范围的写在一个小区中的公式的功能。

Range("C1").Formula = "=A1+B1"
Range("C1:C10").FillDown

Answer 4:

使用FormulaR1C1：

Cells((1,3),(10,3)).FormulaR1C1 = "=RC[-2]+RC[-1]"

不同于公式，FormulaR1C1具有相对引用。

Answer 5:

用这个

            Sub calc()


            Range("C1:C10").FormulaR1C1 = "=(R10C1+R10C2)"


            End Sub

Answer 6:

如果你想填补一列，你可以用一个键盘命令做这在Excel 2010中：

1. 设置的上最左侧的小区的公式
2. 选择整个范围
3. 按Ctrl-d

CTRL-d将或者填充跨选定的行，或向下填充选定阵列或列。 相对引用应用。

文章来源: Set formula to a range of cells