1. 如何快速建立多个excel文件
工作中经常会遇到这样的情况，上级部门在收集了下级部门的Excel工作薄后，需要将信息汇总到一个工作表中，通过复制粘贴的话，这个过程枯燥乏味，如果出错就得不偿失了。Microsoft Excel版本太低，没有那么多的功能来方便我们的工作，那么只能通过“万能”的VBA来实现了。
Microsoft Excel快速合并多个工作簿至一个工作簿中详细操作流程：
步骤一：首先将需要合并的Microsoft Excel工作薄放在一个文件夹中，然后在这个文件夹中新建一个Microsoft Excel工作表，并重命名为【合并.xlsx】。左键双击打开【合并.xlsx】Microsoft Excel工作表。右键单击【合并】工作表后，左键单击右键菜单中的【查看代码(V)】选项，打开【Visual Basic编辑器】。
步骤二：编辑VBA代码。左键单击选中【Sheet1 合并】后，在右侧代码窗口中键入以下代码，您也可以选择复制粘贴，请注意代码中的标点符号为英文标点符号。代码输入完成后，同时按下键盘上的【Ctrl + S】键保存代码，先左键单击【Microsoft Excel】对话框中的【是（Y）】按钮，再左键单击【Microsoft Excel】对话框中的【确定】按钮，最后关闭【Visual Basic编辑器】即可完成代码编辑。
Sub 合并工作薄()
Dim FileOpen
Dim X As Integer
Application.ScreenUpdating = False
FileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(.xlsx),.xlsx", MultiSelect:=True, Title:="合并工作薄")
X = 1
While X <= UBound(FileOpen)
Workbooks.Open Filename:=FileOpen(X)
Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
X = X + 1
Wend
ExitHandler:
Application.ScreenUpdating = True
Exit Sub
errhadler:
MsgBox Err.Description
End Sub
步骤三：Microsoft Excel快速合并多个工作簿至一个工作簿使用方法。执行VBA代码，首先需要在菜单栏中显示【开发工具】。显示【开发工具】详细操作流程请参照：PPT小技巧：如何把视频嵌入到PPT演示文稿中合并成一个文件？PPT和Excel操作流程基本一致。左键单击菜单栏中的【开发工具】选项卡，左键单击【代码】功能区中的【宏】按钮。左键单击选中【宏】对话框中的【Sheet1.合并工作薄】后，左键单击【执行（R）】按钮。
步骤四：在弹出的【合并工作薄】对话框中，长按键盘上的【Ctrl】键，鼠标左键单击选中需要合并的Microsoft Excel工作表，这样可以跳跃式选择，当然【合并】工作表不需要选中，选择完成后，左键单击【打开(O)】按钮。等待片刻多个工作簿已经合并一个工作簿中啦！如想进一步操作请参照：Microsoft Excel怎么快速合并当前工作簿下的所有工作表？
至此，Microsoft Excel快速合并多个工作簿至一个工作簿中操作流程已全部结束。
2. 怎么建立多个excel文件
1、新建一个文件夹、将要合并的表格放到里面、新建一个表格、用excel打开、右击sheet1
2、选择查看代码（ps：excel有着一项，wps没有）
3、将下列代码复制到文本框中：
sub合并当前目录下所有工作簿的全部工作表()
dimmypath,myname,awbname
dimwbasworkbook,wbnasstring
dimgaslong
dimnumaslong
dimboxasstring
application.screenupdating=false
mypath=activeworkbook.path
myname=dir(mypath&"\"&"*.xls")
awbname=activeworkbook.name
num=0
dowhilemyname""
ifmynameawbnamethen
setwb=workbooks.open(mypath&"\"&myname)
num=num+1
withworkbooks(1).activesheet
.cells(.range("b65536").end(xlup).row+2,1)=left(myname,len(myname)-4)
forg=1tosheets.count
wb.sheets(g).usedrange.copy.cells(.range("b65536").end(xlup).row+1,1)
next
wbn=wbn&chr(13)&wb.name
wb.closefalse
endwith
endif
myname=dir
loop
range("b1").select
application.screenupdating=true
msgbox"共合并了"&num&"个工作薄下的全部工作表。如下："&chr(13)&wbn,vbinformation,"提示"
endsub
4、点击运行、一段时间（取决于表格的大小和多少）后，合并完成了。
3. 如何快速建立多个excel文件并命名
1、打开Excel，用日期做示例，如果是要用不同姓名命名也是同样的方法。选中要作为工作表名称的内容，就是选中所有日期，然后点击插入。
2、然后点击数据透视表，再选择数据透视表。
3、弹出窗口，什么都不用修改，直接点击确定。
4、然后在右边框中的日期前面打勾。
5、然后再按住鼠标，把日期拖动到报表筛选。
6、接着单击左边选项后面的倒三角展开。
7、选择【显示报表筛选页】。
8、弹出窗口，直接点击确定。
9、这样就做出多个工作表，并且是用日期命名的。但是每个工作表里面都会有个日期，我们也可以一次性把它们删除，但是直接右击删除或用键盘上的删除键都是删除不了的，想要删掉的话接着往下看。
10、选中所有要删除的工作表，就是选中【1日】工作表，再按住shift键，单击最后一个工作表【9日】，这样就选中所有工作表，然后选择要删除的单元格内容，点击开始。
11、点击【清除】，再选择【全部清除】。
12、这样就都删除好了，完成。
4. 如何快速建立多个excel文件夹
1/6
新建一个文件夹的方法很简单，在文件夹内单击鼠标右键，选取新建文件夹即可。但是这种方式下只能新建默认文件名的文件夹，且只能建立单一的文件夹。
2/6
我们可以使用命令行来新建文件夹，在新建的时候还可以命名文件夹。方法是在cmd窗口中，进入需要新建文件夹的路径，然后输入md “文件夹名称”即可。md与文件夹名称之间有空格。
3/6
所以我们可以利用excel中的自动填充功能来批量的新建序列文件夹。我们打开excel表格，输入一个顺序序列。
4/6
在b列中输入md指令，并向下填充，完成命令行新建文件夹命令的填充。md之后一定要有空格间隔开序列数。
5/6
新建一个文本文档，保证后缀名可显示。然后将b列数据复制粘贴到文本文档内。
6/6
保存文本文档，并将txt后缀名修改为bat后缀名，将文本文档以批处理方式运行。可以看到该文件夹内新建了所指定数量的文件夹，并且名字是序列形式
5. 如何快速创建多个excel文件
1、打开excel，新建一个excel工作表，在第一列中输入"md "，在md后面加入一个空格，需要多少个文件夹，复制多少个即可。
2、在第二列中输入需要创建文件夹的地址，如果是同一个地址下，可以直接复制为相同的。
3、第三列需要输入创建文件夹的名称，在第三列就分别输入这个文夹名称。
4、在第四列中，把前面一的内容叠并起来，用&符号，如第一行就用公式“=A1&B1&C1”。
5、新建一个文本文件，把最后的结果复制到文本中，一行一个，进行保存。
6、把这个文本文件的扩展名更改为.bat格式的文件，双击运行后就可以在所指定的目录下，生成需要的文件夹了。
6. 如何快速建立多个excel文件格式
打开所有需要设置打印格式的工作表格，按住Ctrl键不放，再鼠标点击每一张工作表的表签。然后“文件”——“页面设置”中设置你需要的格式。
7. 如何把多个excel
最简洁快速的做法莫过于用INDIRECT函数。
请看示例：
从上例来说。
假如有60个表格，拟取所有表格的B列数值到汇总表格。
在第一行B1开始输入所有表格名。
在A列输入行序号
在B2输入：
=INDIRECT(B$1&"!B"&$A2)
（注意公式里的$）
向右向下复制至需要的位置。
成功！
INDIRECT是我比较喜欢的一个函数，使用巧妙可以解决许多大问题。
8. 快速建立多个excel文档
这个需要用宏代码解决，帮你做了一个，你参考下。
假定“总表”是你所有的数据，拆分后的文档存放在“总表拆分”文档所在的文件夹，拆分后的文件名称按照“拆分”+数字的形式，拆分的文档表头和总表一致。
使用方法：
1.EXCEL启用宏设置；
2.在“总表”页面点击“总表拆分”的按钮即可。
试试吧…
- 相关评论
- 我要评论
-
