在VBA中，自动保存数据（2）？

  • 原创
  • |
  • 浏览：2036
  • |
  • 更新：
  • 在VBA中，自动保存数据（2）？1
  • 在VBA中，自动保存数据（2）？2
  • 在VBA中，自动保存数据（2）？3
  • 在VBA中，自动保存数据（2）？4
  • 在VBA中，自动保存数据（2）？5
  • 在VBA中，自动保存数据（2）？6
  • 在VBA中，自动保存数据（2）？7
分步阅读

本篇经验将和大家分享【在VBA中，自动保存数据的第二种方法！】

工具/原料

  • 电脑一台
  • office办公软件

方法/步骤

  1. 1

    实例【将工作表sheet3中的数据保存至sheet4中】

    在VBA中，自动保存数据（2）？
  2. 2

    在工作表中，点击菜单栏【开发工具】，在其工具栏内，点击【visual basic】!

    在VBA中，自动保存数据（2）？
  3. 3

    会进入VBA编辑界面！点击菜单栏【插入】，在其下拉菜单中，选择【模块】！

    在VBA中，自动保存数据（2）？
  4. 4

    会弹出模块编辑窗口！

    在VBA中，自动保存数据（2）？
  5. 5

    在代码编辑窗口输入以下代码：

    Sub 自动保存()

    Dim i As Integer, j%, k As Integer

    i = [a1].CurrentRegion.Rows.Count - 1

    j = [a1].CurrentRegion.Columns.Count

    k = Sheets("sheet4").[a1].CurrentRegion.Rows.Count

    [a2].Resize(i, j).copy Sheets("sheet4").[a1].Offset(k)

    End Sub

    在VBA中，自动保存数据（2）？
  6. 6

    在VBA窗口，点击【运行】按钮！

    在VBA中，自动保存数据（2）？
  7. 7

    sheet3工作表中的数据会自动保存至sheet4中！

    在VBA中，自动保存数据（2）？
    END
  8. 7
    此文章非法爬取自百度经验
经验内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。
作者声明：本篇经验系本人依照真实经历原创，未经许可，谢绝转载。
展开阅读全部