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