工作能力有哪些（重复的工作） _能力

工作中，我们对一些重复的工作可能会采取批量的操作，例如：批量创建文件夹，批量提取文件名，批量生成工作表或工作簿，这些批量操作有什么技巧，下面跟我一起来看看！
一、批量生成文件夹具体操作步骤如下：
1、先将要批量生成文件夹的文件名输入到Excel表格中，然后使用公式="MD "&B4 。（MD后面需加一个空格）

文章插图
2、创建一个文本文件，将生成的文件命令粘贴到文本文件中。

文章插图
【工作能力有哪些（重复的工作）】3、将文本文件另存到自己需要保存的位置，然后将编码格式选择“ANSI”（默认是“UTF-8”，生成的文件夹名称会乱码）。

文章插图
4、将文本文件的后缀名“txt”改为“bat”，然后鼠标左键双击运行即可。

文章插图
5、动图演示如下。

文章插图
二、批量提取文件名具体操作步骤如下：
1、在要批量提取文件名的文件夹内创建一个新的文本文件，然后输入命令dir /b >test.txt并保存。

文章插图
2、将文本文件的后缀名“txt”改为“bat”，然后鼠标左键双击运行，此时会生成一个test.txt的文件。

文章插图
3、打开test.txt文件，可以看到该文件夹下的所有文件名称包括后缀名都被提取出来了。

文章插图
4、完整动图演示如下。

文章插图
三、批量创建工作表具体操作步骤如下：
1、选中要批量创建工作表的名称，插入“数据透视表” 。

文章插图
2、将工作表名称拖动到数据透视表的“筛选”区域中。

文章插图
3、设置透视表的格式为“显示报表筛选页” 。

文章插图
4、效果图如下。

文章插图
5、动图演示如下。

文章插图
四、批量创建工作簿可参考如下代码：

Sub newbooks()Dim i&, p$, temp$On Error Resume Next'忽略代码运行中的错误，避免存在异常名称工作簿等问题时，代码运行中断 。Application.ScreenUpdating = False'关闭屏幕刷新p = ThisWorkbook.Path & ""'取得当前工作薄所在路径For i = 1 To Cells(Rows.Count, 1).End(3).Row'循环读取A列数据temp = Cells(i, 1) & ".xlsx"'temp是完整的含文件后缀的工作薄名称With Workbooks.Add'新建工作薄.SaveAs p & temp'保存工作薄，p & temp是要保存的文件的名称.Close False'关闭工作薄End WithNextApplication.ScreenUpdating = True'恢复屏幕刷新End Sub

动图演示如下：

文章插图
你还知道哪些批量操作的技巧呢？或者你想了解什么批量操作技巧？欢迎在评论区留言分享哦~
本文首发公众号【Word和Excel达人先生】，如需转载请私信联系小编~