最受欢迎的四个办公神技，你最钟爱哪一个？

1、批量生成工作表

简要说明：

• 生成数据透视表

• 将文本拖动到筛选字段

• 显示报表筛选页

2、批量文件重命名

简要说明：

• 用公式='ren '&A2&' '&B2生成重命名的批处理命令

• 粘贴到记事本

• 将后缀名txt修改为bat，双击

• 注意：ren后面有一个空格，不要漏掉

• 如果文件名中有空格，需要在文件名的最外层再加上一对半角引号。

3、批量生成工作簿

简要说明：

• 在VBE界面中输入以下代码：

Sub newbooks()

    Dim i&, p$, temp$

    On Error Resume Next

    Application.ScreenUpdating = False

    p = ThisWorkbook.Path & '\'

    For i = 2 To Cells(Rows.Count, 1).End(3).Row

        temp = Cells(i, 1) & '.xlsx'

        With Workbooks.Add

            .SaveAs p & temp

            .Close False

        End With

    Next

    Application.ScreenUpdating = True

End Sub

• 执行代码即可生成指定名称的工作簿。

4、批量生成文件夹

简要说明：

• 用公式='MD '&A2生成批处理命令

• 粘贴到记事本

• 将后缀名txt修改为bat，双击

• 注意：MD后面有一个空格，不要漏掉

好了，今天的分享就是这些吧，祝各位一天好心情！

还是那句老话，光说不练假把式，一定要试试哦~~

图文制作：祝洪忠

---

---

PPT美化设计 - 第5期
公开课时间：2017-5-5（晚上20:00~22:00）
正式课时间：2017-5-14 —— 2017-5-28
课程详情：http://t.excelhome.net/thread-44987-1-1.html
免费报名公开课：http://t.excelhome.net/thread-44988-1-1.html

QQ交流群：246666939