tft每日頭條

 > 圖文

 > word聯動excel批量合并

word聯動excel批量合并

圖文 更新时间:2024-09-17 21:16:01

我們在工作中經常需要将各種各樣的文檔合并,最常見的就是Word、Excel和PDF文件了,很多小夥伴都是用複制粘貼來合并文件的,這樣的效率實在是不高,那麼有什麼辦法可以快速合并多個文件呢?今天小編就來分享一些關于Word、Excel、PDF文件合并的方法,有需要的小夥伴可以學一學哦!

一、Word合并

1、插入對象

當我們需要合并多個Word文檔的時候,我們首先可以先打開一個空白的文檔,然後點擊工具欄的【插入】—【對象】—【從文件中選擇文字内容】。如下圖所示:

word聯動excel批量合并(原來Word和Excel都自帶一鍵合并功能)1

2、Ctrl多選

然後在彈出來的窗口中找到我們要合并的文件,在這裡我們可以按Ctrl鍵同時選中多個文件,然後點擊下方的【插入】按鈕即可!

word聯動excel批量合并(原來Word和Excel都自帶一鍵合并功能)2

二、Excel合并

1、VBA

有時候我們的Excel文件中有好幾個工作表,那麼我們要如何快速合并呢?首先,我們可以按下【Alt F11】打開VBA界面,然後插入一個模塊。

word聯動excel批量合并(原來Word和Excel都自帶一鍵合并功能)3

2、代碼

然後将下面的代碼複制粘貼進去:

Sub 多表合并()

Dim arr()

For Each sh In Sheets

If sh.Name <> "彙總" Then

arr1 = sh.Range("a2:c" & sh.UsedRange.Rows.Count)

act = act UBound(arr1)

ReDim Preserve arr(1 To 3, 1 To act) '

For j = 1 To UBound(arr1)

n = n 1

arr(1, n) = arr1(j, 1)

arr(2, n) = arr1(j, 2)

arr(3, n) = arr1(j, 3)

Next

End If

Next

Sheets("彙總").[a2].Resize(n, 3) = Application.Transpose(arr)

End Sub

word聯動excel批量合并(原來Word和Excel都自帶一鍵合并功能)4

點擊【插入】,選擇第一個圖标,指定宏,然後給這個按鈕重命名:

word聯動excel批量合并(原來Word和Excel都自帶一鍵合并功能)5

最後隻要點一下這個按鈕即可合并所有工作表了!

word聯動excel批量合并(原來Word和Excel都自帶一鍵合并功能)6


三、PDF合并

1、工具

如果需要合并PDF文件的話又有什麼快速地方法呢?我們可以借助一些工具來完成,【迅捷PDF轉換器在線版】這個網站就有【PDF文件合并】功能!

word聯動excel批量合并(原來Word和Excel都自帶一鍵合并功能)7

2、PDF合并功能

我們找到這個文件,點進去,然後将要合并的文件上傳上來,然後點擊【開始合并】:

word聯動excel批量合并(原來Word和Excel都自帶一鍵合并功能)8

稍等幾秒之後就可以得到合并後的文件了,點擊【立即下載】即可下載到電腦裡:

word聯動excel批量合并(原來Word和Excel都自帶一鍵合并功能)9

好啦,這就是小編今天要分享的内容了,如果你還有更多更好的方法的話也歡迎在評論區分享哦!

,

更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!

查看全部

相关圖文资讯推荐

热门圖文资讯推荐

网友关注

Copyright 2023-2024 - www.tftnews.com All Rights Reserved