快速合并單個excel表中的多個sheet的工作頁

1、快速合并單個excel表中的多個sheet的工作頁很多朋友會遇到這樣的問題，就是很有很多頁的數(shù)據(jù)，少的有幾十頁，多的可能有幾百頁，然后需要合并到一個頁面做數(shù)據(jù)分析，如果一頁頁的復(fù)制粘貼的話，就比較麻煩。下面我就介紹一種利用excel的宏計算來解決這個問題。方法：1.首先我們要有自己的excel數(shù)據(jù)，并且我們需要的是microsoftexcel，WPS沒有這些負(fù)責(zé)的功能。比如我下面舉例的，我自己有205頁的數(shù)據(jù)需要合并，如圖所示。2.看到

2、這么多數(shù)據(jù)頁要合并，如果是復(fù)制粘貼的話，工作量就很大了。我們現(xiàn)在開始合并，首先要在最前頁新建一個工作表。如圖：4.看到宏計算界面，我們就只需要把下面的代碼復(fù)制進(jìn)去，代碼如下，效果如下：Sub合并當(dāng)前工作簿下的所有工作表()Application.ScreenUpdating=FalseFj=1ToSheets.CountIfSheets(j).NameActiveSheet.NameThenX=Range(“A65536“).End(x