• 技巧025(下)批量复制指定位置写入,On error应用 - 图1

    本技巧的目的: 掌握根据已知姓名列表批量复制工作表,改名, 并在指定位置写入姓名及其他信息。

    • 技巧025(下)批量复制指定位置写入,On error应用 - 图2

      代码助手:准确快速的完成代码的输入,大大提高代码的输入效率。

    • 代码助手下载地址 http://excel880.com/blog/archives/11297

    • 首创行号功能,顶部可以实现快速跳转
    • 技巧025(下)批量复制指定位置写入,On error应用 - 图3
    • 在代码窗口输入中文 工作表 + 空格, 即可搜索自己收藏的代码:
    • 技巧025(下)批量复制指定位置写入,On error应用 - 图4

      批量复制,写入的代码:

    • Sht名单表:

    • 技巧025(下)批量复制指定位置写入,On error应用 - 图5
    • 简历表:
    • 技巧025(下)批量复制指定位置写入,On error应用 - 图6
    • 代码基本逻辑:“Sht名单”表中的姓名行循环,先根据错误值判断要复制的表是否存在,如果不存在:则复制“简历表”工作表,改名,填充姓名。技巧025(下)批量复制指定位置写入,On error应用 - 图7
    • Sheets.Copy:将工作表复制到工作簿的另一位置。
    • Before:指定位置之前放置所复制工作表的工作表
    • After: 指定位置之后放置所复制工作表的工作表
    • Before 和 After 两个参数只能二选一
    • CStr函数: 将值强制转换为字符串

      更多作品请百度搜索 郑广学

      VBA代码助手 懒人神器 在 EXCEL880.COM 官网下载