1、Microsoft Excel快速合并多个工作簿至一个工作簿中详细操作流程:步骤一:首先将需要合并的Microsoft Excel工作薄放在一个文件夹中,然后在这个文件夹中新建一个Microsoft Excel工作表,并重命名为【合并.xlsx】。
2、左键双击打开【合并.xlsx】Microsoft Excel工作表。
(相关资料图)
3、右键单击【合并】工作表后,左键单击右键菜单中的【查看代码(V)】选项,打开【Visual Basic编辑器】。
4、步骤二:编辑VBA代码。
5、左键单击选中【Sheet1 合并】后,在右侧代码窗口中键入以下代码,您也可以选择复制粘贴,请注意代码中的标点符号为英文标点符号。
6、代码输入完成后,同时按下键盘上的【Ctrl + S】键保存代码,先左键单击【Microsoft Excel】对话框中的【是(Y)】按钮,再左键单击【Microsoft Excel】对话框中的【确定】按钮,最后关闭【Visual Basic编辑器】即可完成代码编辑。
7、Sub 合并工作薄()Dim FileOpenDim X As IntegerApplication.ScreenUpdating = FalseFileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(.xlsx),.xlsx", MultiSelect:=True, Title:="合并工作薄")X = 1While X <= UBound(FileOpen)***.Open Filename:=FileOpen(X)Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)X = X + 1WendExitHandler:Application.ScreenUpdating = TrueExit Suberrhadler:MsgBox Err.DescriptionEnd Sub步骤三:Microsoft Excel快速合并多个工作簿至一个工作簿使用方法。
8、执行VBA代码,首先需要在菜单栏中显示【开发工具】。
9、显示【开发工具】详细操作流程请参照:PPT小技巧:如何把视频嵌入到PPT演示文稿中合并成一个文件?PPT和Excel操作流程基本一致。
10、左键单击菜单栏中的【开发工具】选项卡,左键单击【代码】功能区中的【宏】按钮。
11、左键单击选中【宏】对话框中的【Sheet1.合并工作薄】后,左键单击【执行(R)】按钮。
12、步骤四:在弹出的【合并工作薄】对话框中,长按键盘上的【Ctrl】键,鼠标左键单击选中需要合并的Microsoft Excel工作表,这样可以跳跃式选择,当然【合并】工作表不需要选中,选择完成后,左键单击【打开(O)】按钮。
13、等待片刻多个工作簿已经合并一个工作簿中啦!如想进一步操作请参照:Microsoft Excel怎么快速合并当前工作簿下的所有工作表?至此,Microsoft Excel快速合并多个工作簿至一个工作簿中操作流程已全部结束。
14、代码根据实际需求进行修改。
本文到此分享完毕,希望对大家有所帮助。
关键词: