分享兩個(gè)方法:1.使用ExcelVBA粘貼代碼2.簡道云
親測有效,建議點(diǎn)贊收藏!
01ExcelVBA
Sub合并當(dāng)前工作簿下的所有工作表() Application.ScreenUpdating=False Forj=1ToSheets. CountIfSheets(j).Name<>ActiveSheet.NameThen X=Range("A65536").End(xlUp).Row+1 Sheets(j).UsedRange.CopyCells(X,1) EndIf Next Range("B1").SelectApplication.ScreenUpdating=True MsgBox"當(dāng)前工作簿下的全部工作表已經(jīng)合并完畢!",vbInformation,"提示" EndSub
02數(shù)據(jù)收集分析展示一站式平臺(tái)——簡道云
3、后臺(tái)自動(dòng)匯總數(shù)據(jù),生成總表,管理員隨時(shí)可以查看。
關(guān)注@簡道云,帶你收獲更多職場干貨!