国产成人精品久久免费动漫-国产成人精品天堂-国产成人精品区在线观看-国产成人精品日本-a级毛片无码免费真人-a级毛片毛片免费观看久潮喷

您的位置:首頁技術文章
文章詳情頁

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

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

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

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

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

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

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

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

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

多個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、然后我們點擊操作菜單中的“運行”選項(具體如下圖所示),即可運行以上的宏命令。

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

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

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

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

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

7、當用戶需要保存時,只需要點擊文件,然后選擇“另存為”即可完成。

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

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

標簽: excel
主站蜘蛛池模板: 国产一区二区三区在线观看视频 | 一个人看的日本免费视频 | 日韩一级欧美一级毛片在线 | 国产三级a三级三级 | 国产成人免费在线观看 | 久久久黄色大片 | 日本专区 | 国产高清国产专区国产精品 | 国产欧美日韩精品在线 | 成人在线中文字幕 | 欧美成人性色生活片免费在线观看 | 免看一级a毛片一片成人不卡 | 一级片免 | 国产成人盗拍精品免费视频 | 亚洲国产精品91 | 亚洲情a成黄在线观看 | 五月色婷婷综合开心网亚 | 国产人成午夜免费噼啪视频 | 色视频www在线播放国产人成 | 久久精品一品道久久精品9 久久精品一区 | 国产高清精品自在线看 | 国产三级毛片视频 | 欧美一级毛片一 | 波多野结衣在线观看一区二区三区 | 韩国毛片 免费 | 欧美亚洲一级片 | 亚洲专区在线视频 | 成年人视频在线观看免费 | 国产一级视频在线 | 欧美精品亚洲精品日韩一区 | 美女视频永久黄网站免费观看国产 | 久久视频6免费观看视频精品 | 韩国在线精品福利视频在线观看 | 2021国产精品一区二区在线 | 国产一级aa大片毛片 | 丝袜美腿精品一区二区三 | 亚洲欧美二区三区久本道 | 久草在线影 | 成人性色生活片免费网 | 91一区 | 久久久久一 |