excel快速批量复制某个sheet(sheet命名来自某个sheet中某一列数据)

需求：我要建的sheet 来这于 Sheet1 的C列（新建的sheet名称必须跟这一列内容对上），而且我要建的sheet不能是空白的，必须是来自某个模板

图一：需要新建的sheet的名称来源

图二：需要新建的sheet内容的模板

最后效果图

具体操作步骤

1、新建sheet sheet1存放新建sheet名称

2、再新建sheet，存放新建sheet的模板

3、打开开发者工具（没看到，请拉到图四后面查看）

4、新建一个模块，往模块贴入代码（在最后），按照需求修改代码，然后运行程序

图三：打开vb编辑器

图四：打开代码编辑器，编写代码并运行

如果没有看到开发者工具，需要这样子调整（excel2016版本）

打开文件，选项->自定义功能->勾选开发者工具

代码

'**********************************************'*  删除表格，可以不用复制这段代码'* param no:表示删除从第几页开始到最后一页的sheet(加入要保留前两页，no=3)'**********************************************Sub delete()Dim nono = 3For i = Sheets.count To no Step -1Sheets(i).deleteApplication.DisplayAlerts = False '无论删除多少个sheet只提醒一次是否要删除NextEnd Sub'**********************************************'*  复制表格，要根据一个目录来'* param copy_source_table:复制模板表的表名'* param sheet_name_source_table_name: sheetName来源的表'* param sheet_name_source_table_colum: sheetName来源的表中的名称所在的具体列'**********************************************Sub CopyByContent()Dim num, name, sheet_name_source_table_name, sheet_name_source_table_colum, copy_source_tablecopy_source_table_name = "Sheet2"sheet_name_source_table_name = "Sheet1"sheet_name_source_table_colum = "C"num = Sheets(sheet_name_source_table_name).UsedRange.Rows.count '获取某个表格使用的函数For i = 1 To numSheets(copy_source_table_name).Copy After:=Sheets(Sheets.count)name = Sheets(sheet_name_source_table_name).Cells(i, sheet_name_source_table_colum).ValueActiveSheet.name = nameNextEnd Sub

excel快速批量复制某个sheet(sheet命名来自某个sheet中某一列数据)相关推荐

Excel表格VLOOKUP函数的应用（如何把A表中的一列数据匹配到B表中）
在Excel表中,经常需要将一个表中数据匹配到另一张表中,这时候就需要用到VLOOKUP函数. 两列数据合并:=E2&F2,&符号,双击自动填充列数据. 举例(以单个查找条件为例,查 ...
c# 获取excel单元格公式结果_每日一Excel技巧（熟能生巧）：带公式的单元格，快速批量复制、填充...
带公式的单元格,快速批量复制.填充技巧,提高工作效率. 方法一.拖拽填充柄选中单元格,鼠标放在单元格右下角,当鼠标指针为黑色实心"十字"填充柄时,按住鼠标左键横向或纵向拖动,可将 ...
datagridview 纵向横向合并单元格_每日一Excel技巧（熟能生巧）：带公式的单元格，快速批量复制、填充...
带公式的单元格,快速批量复制.填充技巧,提高工作效率. 方法一.拖拽填充柄选中单元格,鼠标放在单元格右下角,当鼠标指针为黑色实心"十字"填充柄时,按住鼠标左键横向或纵向拖动,可将 ...
快速批量新建文件夹并命名，详细步骤
如何快速批量新建文件夹并命名?大家对电脑上的文件夹应该比较熟悉吧,文件夹就像一个盒子,盒子里面可以存放各种文件,可见文件夹在电脑上是多么的重要.对于新建文件夹,相信大家也知道怎么操作,右击鼠标后点击新 ...
Python+Excel系列：案例七：将一个工作薄的所有工作表批量复制到其他工作簿、将某个工作表的数据批量复制到其他工作簿的指定工作表中
文章目录将一个工作薄的所有工作表批量复制到其他工作簿将某个工作表的数据批量复制到其他工作簿的指定工作表中将一个工作薄的所有工作表批量复制到其他工作簿 import os #导入os模块 impo ...
如何利用Excel快速批量创建文件夹
今天跟大家分享一下如何利用Excel快速批量创建文件夹 1.打开Excel 2.录入要创建的文件夹名称 3.然后录入要创建文件夹的地址 4.接着我们将这两列数据合并并选中单元格区域 5.然后点击下图选 ...
Excel:快速合并多张表格或多个文件（工作簿）的数据（附Python代码）
Excel:快速合并多张表格或多个文件(工作簿)的数据(附Python代码) 现实工作中经常遇到将零散的原始数据合并统计的工作要求,如月度统计或年度统计等.原始数据的收集大多是按时间(如日期或小时)进 ...
python3读取excel某一列_怎样用python，读取excel中的一列数据!python读取excel某一列数据...
Python 如何循环读取csv或者excel中的一列数据,写入到中搜索是可以 a.csv复制到 b.csv中 import csv def foo(): with open('a.csv', 'r ...
EXCEL中筛选一列数据中所包含的某些数字，返回它前面的序号
EXCEL中筛选一列数据中包含某些数字.返回它前面的序号.(0x040403为要含的数字) 思想是将所要查找的内容替换为一串很长的字符串,用长度区分它们在C2单元格中键入 =IF(LEN(SUBST ...

excel快速批量复制某个sheet(sheet命名来自某个sheet中某一列数据)

excel快速批量复制某个sheet(sheet命名来自某个sheet中某一列数据)相关推荐

最新文章

热门文章