av一区二区在线观看_亚洲男人的天堂网站_日韩亚洲视频_在线成人免费_欧美日韩精品免费观看视频_久草视

您的位置:首頁技術(shù)文章
文章詳情頁

多個excel文件合并成一個excel表的方法

瀏覽:102日期:2023-08-12 15:10:45

Excel是我們最常用的數(shù)據(jù)處理軟件,而在我們使用Excel時,常常會處理同一類的數(shù)據(jù),例如,我們制作月度報(bào)表,那么在年末時我們共積累了1至12月的月度報(bào)表,這時我們的Excel的文檔將多達(dá)12個,實(shí)在不利于我們的保存/分析/使用,那么我們?nèi)绾螌⒍鄠€Excel文件合并成一個文檔,并且在保留所有的Excel原數(shù)據(jù)基礎(chǔ)上,做到所有的文檔完全獨(dú)立呢,其實(shí)我們在Excel中能夠通過宏命令建立多個Sheet頁來實(shí)現(xiàn),還不知道如何操作用戶趕緊來了解一下吧!

多個excel文件合并成一個excel表的方法方步/驟法

1、首先,我們新建一個文件夾,將我們將所有需要合并的“Excel文件”放入其中,并根據(jù)自己的需要對其進(jìn)行排序,然后再此文件夾中新建一個Excel文件(空白Excel文檔),如下圖所示。

多個excel文件合并成一個excel表的方法

2、接著,我們打開這個新建的Excel文檔,進(jìn)入界面后,我們通過快捷組合鍵“Alt + F11”來打開“宏”。

多個excel文件合并成一個excel表的方法

2、然后我們在菜單欄中選擇“視圖”,然后在下拉菜單中點(diǎn)擊“代碼窗口”。

多個excel文件合并成一個excel表的方法

3、然后在代碼窗口中輸入以下的命令代碼:

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表的方法

4、然后我們點(diǎn)擊操作菜單中的“運(yùn)行”選項(xiàng)(具體如下圖所示),即可運(yùn)行以上的宏命令。

多個excel文件合并成一個excel表的方法

5、然后彈出瀏覽窗口,我們在文件夾中選擇我們所需要合并的所有Excel文件,然后點(diǎn)擊“確認(rèn)”按鈕。

多個excel文件合并成一個excel表的方法

6、等到宏命令合并結(jié)束后,,將自動生成一個工作簿,此時用戶即可在下方的Sheet頁中查看到相應(yīng)的Excel文件,在需要切換文檔時只需要直接選擇即可,如下所示:

多個excel文件合并成一個excel表的方法

7、當(dāng)用戶需要保存時,只需要點(diǎn)擊文件,然后選擇“另存為”即可完成。

多個excel文件合并成一個excel表的方法

上述的方法就是多個Excel文件合并為同一文檔,且保留所有原數(shù)據(jù)的方法,其實(shí)就是通過建立多個Sheet頁來實(shí)現(xiàn)保存為同一文檔,同時達(dá)到互不干擾。

標(biāo)簽: excel
主站蜘蛛池模板: 国产探花在线精品一区二区 | 国产精品久久久久久影视 | 国产精品成人国产乱一区 | 天天搞天天操 | 午夜视频免费在线观看 | 国产一区精品 | 国产a视频| 夜夜草 | 久久久久久av | 欧美a∨ | 亚洲欧美中文日韩在线v日本 | 久久99蜜桃综合影院免费观看 | 久久久久久成人 | 国产欧美精品一区二区 | 成人亚洲片 | 动漫www.被爆羞羞av44 | 久久天天躁狠狠躁夜夜躁2014 | 久久久久91 | 91色站| 毛片视频免费观看 | 久久久久国产一区二区三区四区 | 精品国产乱码久久久久久影片 | 超碰8 | 欧美性生活一区二区三区 | 久久精品免费 | 蜜桃av鲁一鲁一鲁一鲁 | av一二三区 | 91在线精品秘密一区二区 | 久久av在线播放 | 国产精品麻 | 国产免费福利小视频 | 九九热这里只有精品6 | 国产成人午夜精品影院游乐网 | 午夜影院在线播放 | 国产精品国产亚洲精品看不卡15 | 国产欧美日韩综合精品一区二区 | 久久免费观看一级毛片 | 在线观看国产精品视频 | 国产精品久久久久久久免费大片 | 一级黄色毛片a | 精品在线|