四个Excel办公神技，实用才是硬道理

原创 2017-10-08 祝洪忠 

俗话说好景不长，长假已是最后一天了，估计此刻很多小伙伴还堵在路上吧。

话说天下武功，唯快不破，今天老祝和大家分享四个最常用的批量处理文件的技巧：

批量生成工作表

简要说明：

1. 生成数据透视表

2. 将文本拖动到筛选字段

3. 显示报表筛选页

批量文件重命名

简要说明：

• 用公式生成重命名的批处理命令

• ="ren "&A2&" "&B2

• 在存放文件的文件夹内新建一个记事本，将批处理命令粘贴到记事本，保存。

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

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

• 如果文件名中有空格，需要在公式中的文件名前后再加上一对半角引号，例如：

• ="ren """&A2&""" """&B2&""""

• 

• 如果你的电脑没有显示出文件后缀名，可以按下图的方法设置：
  

Win10设置方法

Win7设置方法

批量生成工作簿

简要说明：

• 在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

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

批量生成文件夹

简要说明：

• 用公式生成批处理命令

• ="MD "&A2

• 粘贴到记事本

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

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