excel中sheet批次合併工作頁的方法:首先在最前頁新建一個工作表;然後在新建的sheet表中【右鍵】,找到【查看程式碼】;最後將程式碼複製進去,並點擊【運行】下的【運行子過程/用戶窗體】即可。
excel中sheet批次合併工作頁的方法:
1、看到這麼多資料頁要合併,如果是複製貼上的話,工作量就很大了。我們現在開始合併,首先要在最前頁新建一個工作表。如圖:
2、在新建的sheet表中“右鍵”,找到“查看程式碼”,然後看到巨集計算介面。如圖所示:
3、看到巨集計算介面,我們就只需要把下面的程式碼複製進去,程式碼如下,效果如下:
Sub 合并当前工作簿下的所有工作表() Application.ScreenUpdating = False For j = 1 To Sheets.Count If Sheets(j).Name <> ActiveSheet.Name Then X = Range("A65536").End(xlUp).Row + 1 Sheets(j).UsedRange.Copy Cells(X, 1) End If Next Range("B1").Select Application.ScreenUpdating = True MsgBox "当前工作簿下的全部工作表已经合并完毕!", vbInformation, "提示" End Sub
4、做完上面的事情,然後只需要點擊工具列上面的「運行」下的「運行子過程/使用者窗體」就可以了,合併完之後會有提示。提示完成之後就可以把巨集計算介面關閉了。如圖:
5、合併後的效果如下圖,我們看到的是合併之後有8000多行,就是205頁合併後的結果。謝謝。如有疑問,請留言。
相關學習推薦:excel基礎教學
以上是excel中如何sheet批量合併工作頁?的詳細內容。更多資訊請關注PHP中文網其他相關文章!