您好,現在漢漢來為大家解答以上的問題。excel工作表和工作簿有什么區別，excel工作表合在一起相信很多小伙伴還不知道,現在讓我們一起來看看吧！

1、Sub 合并工作表() Dim MyPath$, MyName$ Application.ScreenUpdating = False MyPath = ActiveWorkbook.Path &""MyName = Dir(MyPath &"*.xls") On Error Resume Next Do While MyName <>""If MyName <> ***.Name Then With GetObject(MyPath & MyName) .Sheets("newSheet").Copy After:=ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count) End With End If MyName = Dir Loop Application.ScreenUpdating = TrueEnd Sub。

本文就為大家分享到這里，希望小伙伴們會喜歡。