excel表格怎么利用vba自动填充公式?

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

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

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

Sub 填充公式()

    Dim i As Long, j As Long

    With Range("A1").CurrentRegion

        i = .Rows.Count - 1

        j = .Columns.Count - 1

    End With

   

    Range("J3").AutoFill _

        Destination:=Range(Cells(3, 10), Cells(i, 10))

    Range("D16").AutoFill _

        Destination:=Range(Cells(16, 4), Cells(16, j))

End Sub

3、这里with是简化代码的写法，读取了当前活动单元格的区域，并将行列分别赋值为I和J变量-1。

4、简写掉的代码完整版的是Range("A1").CurrentRegion.Rows.Count和Range("A1").CurrentRegion.Columns.Count。就是这么简单和任性。

5、接着我们使用autofill函数来填充给定的单元格区域。其中，自动填充的公式单元格竖列指定的是J3，横行指定的是D13，代码如图。

6、而最终填充的区域范围，为本活动单元格的区域范围，我给的例子格式不正确，大家试试找出正确的公式和标题栏。我们创建一个宏按钮，来看一下正确运行的结果。

赞 (0)

相关推荐

  • Excel表格的空白部分自动填充上一格数据怎样做？

    Excel表格的空白部分自动填充上一格数据怎样做？

    不知道大家在使用Excel表格的时候是否遇到需要将下一栏的空白单元格设置成和上一栏的单元格一样的内容的情况,那么我们可以如何做呢?今天的教程希望可以帮助到你们.具体如下:1. 首先,我们需要选择需要填 ...

  • 如何将excel表格数据排序并自动填充到表格中

    如何将excel表格数据排序并自动填充到表格中

  • 怎么利用Excel表格中的VBA得到最大非空行数

    怎么利用Excel表格中的VBA得到最大非空行数

    今天给大家介绍一下怎么利用Excel表格中的VBA得到最大非空行数的具体操作步骤.1. 打开电脑后,找到准备好的excel表格打开.2. 依次选择上方菜单栏的"开发工具"---&q ...

  • excel表格怎么利用身份证号自动显示出生年月

    wps excel表格怎么利用身份证号自动显示出生年月 操作方法 01 显示在一个表格的做法: 首先打开已经输入好数据的excel表格,然后选中显示出生日期的单元格. 02 这里要用到mid函数,在单 ...

  • 怎么将Excel表格中的数据自动填到另一个表格中？

    怎么将Excel表格中的数据自动填到另一个表格中？

    很多人在处理Excel文档时经常需要在第二张表格中利用到第一张表格的数据,用复制粘贴的方法有些繁琐.接下来小编就给大家介绍一下怎么将Excel表格中的数据自动填到另一个表格中.具体如下:1. 首先第一 ...

  • Excel表格之建立分类下拉列表填充项

    Excel表格要做出下拉填充项是需要方法的,而我们又经常会用到,所以今天就教大家怎么做吧.我们常常要将企业的名称输入到Excel表格中,为了保持名称的一致性,利用"数据有效性"功能 ...

  • 如何使Excel表格删除序号后自动更新序号

    如何使Excel表格删除序号后自动更新序号

    我们在excel中如果已经排好序号了,这时需要删除一行数据,那么怎么才能让删除后的序号自动更新呢?一起来看看具体步骤吧.1. 不过序号的自动更新不仅仅是删除行,还有增加行和隐藏行.依次为大家分析一下. ...

  • 在excel表格中使用vba引用单元格区域

    今天为大家介绍在excel中使用vba来引用单元格区域方法,不会的朋友可以参考本文,来看看吧! 步骤 1.首先我们打开一个工作样表作为例子. 2.使用alt+f11组合快捷键进入vbe编辑器,插入一个 ...

  • WPS表格如何巧用自动填充功能呢?

    大家知道WPS表格或Excel表格的自动填充功能吧?要输入一周的7个日子,只需亲自输入前两个,其余5个由“自动填充功能”一键搞定:下面就为大家详细介绍WPS表格如何巧用自动填充功能方法,一起来看看吧! ...