Excel通过宏来处理批量复制操作
精品文档---下载后可任意编辑 插入复选框 1.点击Excel左上角的图标(如图一),在弹出的窗体内点击“Excel选项”会弹出“Excel选项”窗体。 图一 2.在窗体内的“常用”选择项卡下,将“在功能区显示“开发工具”选项卡”选项勾中。点击“确定”按钮 图二 3.在Excel菜单栏处会显示出“开发工具”菜单 点击“开发工具——插入”会弹出一个控件选择框。 图三 在控件框内选择要插入控件,在Excel表内画出即可。 4.修改ActiveX控件属性,在Excel内选中ActiveX控件,点击菜单内的“属性”会弹出相应控件的“属性窗体”,在窗体内可对控件的属性进行调整。 一、 VBA的使用 录制宏 1. 新建sheet1,录入工资信息 2. 在word选项内添加开发工具菜单。 3. 选中标题列A1,点击开发工具——录制宏 4. 在弹出的录制新宏内维护宏名称、执行快捷键操作 注意,快捷键只能是 Ctrl + 英文字母 5. 录制新宏维护好,确定保存后。 6. 在执行操作前,要先点击开发工具——使用相对引用。显示如下图所示的选中浅黄色背景 7. 选中 A1行复制,再选中A3行,执行复制单元格操作 选中A3单元格,点击开发工具——停步录制完成录制宏操作。 8. 点击开发工具——宏,打开宏查看页面,可以查看到刚录制完成的宏“宏4)” 9. 选中录制的宏,点击执行,在下面列自动添加1行标题栏 10. 批量录制宏操作 11. 打开宏查看页面,选中宏,点击编辑打开 VBA代码页面 12. 在VBA代码编辑页面录入批量复制代码保存(下面代码红色标识) Sub 宏4() Dim i For i = 1 To 15 15 是表示执行15次复制操作(要根据sheet表内容进行推断,例如我建了16行数据,去除第1列已有标题剩下15列需要添加标题列所以这里写15表明要执行15次) 宏4 宏 Selection.Insert Shift:=xlDown Next End Sub 13. 保存关闭代码页面。 14. 在sheet内,选中标题列A1(将之前执行的几列删除除,不然会出现重复标题列) 打开宏页面,选中要宏,点击执行即可一次批量完成操作