一篇好的文章需要好好的打磨,你现在浏览的文章是一篇关于合并工作簿到一个工作簿 合并工作簿vba代码的文章,本文对文章合并工作簿到一个工作簿 合并工作簿vba代码好好的分析和解答,希望你能喜欢,只有你喜欢的内容存在,只有你来光临,我们才能继续前行。
以WPS 2019版本为例:
关于WPS表格合并多个工作簿,您可使用WPS参考下述步骤完成操作:
2.选择添加需合并的文档-开始合并;
3.合并完成后,被合并的工作簿将会变为多个「工作表」存在于一个「工作簿」内。
可以利用VBA快速合并多个工作簿
软件版本:Office2013
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
3.这样,选择的工作簿就变成了当前工作簿的一个个工作表,从而合并到了一个工作簿中:
1.首先把需要合并的excel工作薄整理到一个文件夹中,如图,用来合并到一起的工作薄的名字要注意,这里取名叫“合并工作薄”。
2.打开这个excel表,直接按键ALT+F11,进入下图界面。双击如图所示位置的sheet1。
Sub 工作薄间工作表合并()
Dim FileOpen
Dim X As Integer
Application.ScreenUpdating = False
FileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(*.xls),*.xls", 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
4.注意事项,如图,注意工作薄的名字,同时,注意代码中设定的excel版本。如果出现无法编译的情况,可以用这个共享的txt。
6.选择宏以后会出现下图界面,直接双击图中选项。
7.双击后弹出选择待合并的文件夹中工作薄,直接全选要合并的工作薄即可。
8.如图,这就是合并后的效果,这两个工作薄是下载的2014年的高考录取分数线的内容,效果不错,而且合并工作薄本身的工作表是不会被占用的,是新建的工作表。
以上内容是小编精心整理的关于合并工作簿到一个工作簿 合并工作簿vba代码的精彩内容,好的文章需要你的分享,喜欢合并工作簿到一个工作簿 合并工作簿vba代码这篇精彩文章的,请您经常光顾吧!
下一篇:更多农历
本文标题:合并工作簿到一个工作簿 合并工作簿vba代码
本文链接:http://m.xzfx123.com/article/121135.html
一篇好的文章需要好好的打磨,你现在浏览的文章是一篇关于合并工作簿到一个工作簿 合并...
一篇好的文章需要好好的打磨,你现在浏览的文章是一篇关于加油站工作时间 加油站工作时...
一篇好的文章需要好好的打磨,你现在浏览的文章是一篇关于严谨的工作作风 严谨的工作作...
一篇好的文章需要好好的打磨,你现在浏览的文章是一篇关于个人工作事迹材料范文1000字 ...
一篇好的文章需要好好的打磨,你现在浏览的文章是一篇关于个人简历工作经历怎么写 个人...
一篇好的文章需要好好的打磨,你现在浏览的文章是一篇关于立山小学六一儿童节 占梨小学...
一篇好的文章需要好好的打磨,你现在浏览的文章是一篇关于秋色短文答案怎么写 秋色阅读...
一篇好的文章需要好好的打磨,你现在浏览的文章是一篇关于心理工作室名字大全 心理工作...
一篇好的文章需要好好的打磨,你现在浏览的文章是一篇关于干部档案工作条例 干部档案工...
一篇好的文章需要好好的打磨,你现在浏览的文章是一篇关于国家反恐怖协调小组 国家反恐...