excel表格如何利用vba自动填充公式

用vba在excel中自动填充公式的方法。

1.首先我们打开一个工作样表作为例子。

2.打开vba编辑窗口，创建一个新模块，并输入以下代码：

子填充公式()

Dim i一样长，j一样长

带范围(' A1 ')。当前区域

i=.Rows.Count - 1

j=.Columns.Count - 1

以…结尾

范围(“JBOY3乐队”)。自动填充_

Destination:=Range(单元格(3，10)，单元格(I，10))

范围(' D16 ')。自动填充_

Destination:=Range(单元格(16，4)，单元格(16，j))

末端接头

3.这里，用的是一种简化的代码编写方法。它读取当前活动单元格的区域，并将行和列分别赋给I和J变量-1。

4.缩写代码的完整版本是range ('a1 ')。currentregion.rows.count和range ('a1 ')。currentregion.columns.count

5.然后我们使用自动填充功能来填充给定的单元格区域。其中，公式单元格填充的竖列自动指定JBOY3乐队，横列指定D13，编码

6.最终填充的区域是活动单元格的区域。我给出的例子的格式不正确。请找出正确的公式和标题栏。让我们创建一个宏按钮来查看正确操作的结果。