当前位置:首页 > Excel教程 > 如何将多个excel文件合并为一个excel

如何将多个excel文件合并为一个excel

这篇文章给大家分享的excel技巧是关于如何将多个excel文件合并为一个excel的excel使用技巧,文章将通过图文并茂的形成为您讲解如何将多个excel文件合并为一个excel的excel实战技巧精粹,希望这篇如何将多个excel文件合并为一个excel的excel表格操作技巧能够帮助到您。

·将需合并的excel文件放在同一个文件夹中,并这个文件中新建一个excel文件

·打开新建的excel文件,按alt + f11建,打开宏,选择视图——代码窗口

·将下面分割线内的的代码拷贝进去,并保存。

·======我是分割线======

·Sub sheets2one()

· '定义对话框变量

· Dim cc As FileDialog

· Set cc = Application.FileDialog(msoFileDialogFilePicker)

· Dim newwork As Workbook

· Set newwork = Workbooks.Add

· With cc

· If .Show = -1 Then

· Dim vrtSelectedItem As Variant

· Dim i As Integer

· i = 1

· For Each vrtSelectedItem In .SelectedItems

· Dim tempwb As Workbook

· Set tempwb = Workbooks.Open(vrtSelectedItem)

· tempwb.Worksheets(1).Copy Before:=newwork.Worksheets(i)

· newwork.Worksheets(i).Name = VBA.Replace(tempwb.Name, ".xls", "")

· tempwb.Close SaveChanges:=False

· i = i + 1

· Next vrtSelectedItem

· End If

· End With

· Set cc = Nothing

·End Sub

·======我是分割线======

·点击运行,弹出对话框可,点击运行选项运行程序,

·再次弹出选择对话框,选择要批量合并的excel名,确定即可

·程序运行完毕后,会自动生成一个工作簿,工作簿内包含所有需合并的excel文件,将工作簿另外即可

·注意事项每个需合并的excel文件内为单独一个sheet

以上内容是excel教程网为您精心整理的如何将多个excel文件合并为一个excelexcel基础教程,里面包括有部分excel函数教程,excel表格制作教程等内容,希望这篇如何将多个excel文件合并为一个excel能够帮助您快速学习excel的使用和操作。

您可能感兴趣的财税文章:

· 一次性支付的租金支出怎么在税前扣除?

· 冲回计提成本结转的时候要结转吗?

· 专用发票不报销可以红冲吗

· 转租增值税计税依据是什么?

· 五金配件计入什么会计科目?

· 机器计提折旧要怎么调增调减?

· 虚开增值税专用发票的量刑标准是怎样的?

· 误餐补助可以和工资一起发放吗

· 企业拨缴的工会经费以何种凭证在企业所得税前扣除

· 手写发票可以否税前扣除吗?

· 差旅费报销有哪些注意事项

· ?报税实收资本为0可以申报吗

· 所得税清算时固定资产折旧这个表怎么填

· 法定盈余公积的冲减分录怎么做?

· 房地产涉及的科目有哪些?

· 一般纳税人开增值税普票有没有限制