怎么把多个excel表格里汇总数汇总到另一个表格里 Excel怎么将多个表格里的特定数据汇总到一个表格里
excel\u591a\u4e2a\u8868\u683c\u4e2d\u7684\u6570\u636e\u6c47\u603b\u5230\u4e00\u4e2a\u8868\u683c\u91ccpower query\u591a\u8868\u6c47\u603b
2、选择查看代码（PS：excel有着一项，WPS没有）
3、将下列代码复制到文本框中：
Sub 合并当前目录下所有工作簿的全部工作表()
Dim MyPath, MyName, AWbName
Dim Wb As workbook, WbN As String
Dim G As Long
Dim Num As Long
Dim BOX As String
Application.ScreenUpdating = False
MyPath = ActiveWorkbook.Path
MyName = Dir(MyPath & "\" & "*.xls")
AWbName = ActiveWorkbook.Name
Num = 0
Do While MyName <> ""
If MyName <> AWbName Then
Set Wb = Workbooks.Open(MyPath & "\" & MyName)
Num = Num + 1
With Workbooks(1).ActiveSheet
.Cells(.Range("B65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4)
For G = 1 To Sheets.Count
Wb.Sheets(G).UsedRange.Copy .Cells(.Range("B65536").End(xlUp).Row + 1, 1)
Next
WbN = WbN & Chr(13) & Wb.Name
Wb.Close False
End With
End If
MyName = Dir
Loop
Range("B1").Select
Application.ScreenUpdating = True
MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"
End Sub
4、点击运行、一段时间（取决于表格的大小和多少）后，合并完成了。
绛旓細1. 浣跨敤SUM鍑芥暟+SHIFT蹇嵎閿硶锛氬湪鎬昏〃涓緭鍏ュ叕寮锛岀劧鍚庨夋嫨瑕佹眹鎬荤殑鍗曞厓鏍艰寖鍥达紝鎸変綇SHIFT閿紝鍐嶅崟鍑绘渶鍚庝竴涓崟鍏冩牸锛岀劧鍚庢寜鍥炶溅閿畬鎴愭搷浣溿2. 浣跨敤SUM鍑芥暟+閫氶厤绗︽槦鍙锋硶锛氬湪鍗曞厓鏍间腑鐩存帴杈撳叆鍏紡锛岀劧鍚庝娇鐢ㄩ氶厤绗︽槦鍙锋潵閫夋嫨瑕佹眹鎬荤殑鍗曞厓鏍艰寖鍥淬3. 浣跨敤鍚堝苟璁＄畻鍔熻兘锛氬湪Excel涓変腑瑕佹眹鎬荤殑鍗曞厓鏍硷紝鐐...
绛旓細1銆侀鍏堟墦寮澶氫釜EXCEL琛ㄦ牸锛岀偣鍑昏繘鍏ユ眹鎬荤殑琛ㄦ牸銆2銆佺劧鍚庡湪寮瑰嚭鏉ョ殑绐楀彛涓偣鍑绘墦寮鏁版嵁涓殑鈥滃悎骞惰绠椻銆3銆佺劧鍚庡湪寮瑰嚭鏉ョ殑绐楀彛涓偣鍑绘墦寮娴忚鍓嶉潰鐨勬寜閽紝妗嗛夊嚭鍏朵腑涓涓〃鏍奸渶瑕佹眹鎬荤殑鏁版嵁锛屽洖杞︾‘瀹氥4銆佺劧鍚庡湪寮瑰嚭鏉ョ殑绐楀彛涓偣鍑绘墦寮鈥滄坊鍔犫濓紝缁х画閫夋嫨鍙︿竴涓〃鏍奸渶瑕佹眹鎬荤殑鏁版嵁锛岄噸澶嶈繖涓楠ら夋嫨鍏ㄩ儴...
绛旓細鏂规硶涓锛氬鍒剁矘璐 1. 鎵撳紑姣忎釜宸ヤ綔琛紝閫変腑闇瑕佸鍒跺埌鏂拌〃鐨勬暟鎹尯鍩燂紝浣跨敤Ctrl+C澶嶅埗閫夊畾鐨勬暟鎹2. 鎵撳紑鏂拌〃锛岄夊畾鐩爣浣嶇疆锛屼娇鐢–trl+V灏嗘暟鎹矘璐村埌鏂拌〃涓傝鏂规硶鐨勪紭鐐规槸绠鍗曟槗鎳傦紝娌℃湁鎶鏈棬妲涳紝浣嗘槸鏁版嵁閲忚繃澶ф椂鏁堢巼杈冧綆銆傛柟娉曚簩锛氫娇鐢‥xcel鍑芥暟 1. 鎵撳紑鏂拌〃锛岄夊畾瑕佹斁鍏ユ暟鎹殑浣嶇疆锛岃緭鍏ヤ互涓...
绛旓細VLOOKUP鍑芥暟鍙互鍦ㄤ竴涓尯鍩熸垨琛ㄦ牸涓煡鎵剧壒瀹氬硷紝骞惰繑鍥炲悓涓琛岀殑鍙︿竴涓崟鍏冩牸涓殑鍊銆傞氳繃灏哣LOOKUP鍑芥暟搴旂敤浜庡涓〃鏍硷紝浣犲彲浠ユ牴鎹竴涓〃鏍间腑鐨勫叧閿煎湪鍙︿竴涓〃鏍间腑鏌ユ壘骞惰繑鍥炵浉鍏虫暟鎹紝浠庤屽疄鐜版暟鎹殑姹囨汇備緥濡傦紝濡傛灉浣犳湁涓涓憳宸ュ熀鏈俊鎭〃鏍煎拰涓涓憳宸ュ伐璧勮〃鏍硷紝浣犲彲浠ヤ娇鐢╒LOOKUP鍑芥暟鏍规嵁鍛樺伐ID灏嗗伐璧勪俊...
绛旓細excel琛ㄦ牸涓澶氫釜sheet鍐呭姹囨鍒颁竴涓琛ㄦ牸涓锛屽彲浠ユ寜鐓т互涓嬫楠よ繘琛屾搷浣滐細1銆佹墦寮EXCEL琛ㄦ牸锛岀偣鍑绘暟鎹夐」鍗′腑鐨勨滅幇鏈夎繛鎺モ濄2銆佺偣鍑烩滄祻瑙堟洿澶氣濄3銆佹壘鍒伴渶瑕佹眹鎬荤殑琛ㄦ牸锛岀偣鍑绘墦寮銆4銆侀変腑鐩稿叧Sheet琛ㄦ牸锛岀偣鍑荤‘瀹氥5銆佸脊鍑哄鍏ユ暟鎹璇濇锛岀偣鍑荤‘瀹氥傘愬姞鍏ョぞ缇や竴璧峰涔犮6銆佸悓姝ラ1~5锛屼緷娆℃坊鍔犲叾浠...
绛旓細1. 棣栧厛锛屽湪鐩爣Excel琛ㄦ牸涓璁剧疆濂界敤浜姹囨鏁版嵁鐨勬爣棰樺崟鍏冩牸銆2. 鎵撳紑涓昏彍鍗曪紝閫夋嫨鈥滄暟鎹濋夐」銆3. 鍦ㄤ笅鎷夎彍鍗曚腑锛岀偣鍑烩滄暟鎹伐鍏封濈粍鍐呯殑鈥滃悎骞惰绠椻濋夐」銆4. 寮瑰嚭鈥滃悎骞惰绠椻濆璇濇鍚庯紝鐐瑰嚮鈥滃紩鐢ㄤ綅缃濆鐨勫悜涓婄孩鑹茬澶达紝閫夋嫨骞跺鍏ョ涓涓〃鏍间腑闇瑕佹眹鎬荤殑鏁版嵁鍖哄煙銆5. 涔嬪悗锛岀偣鍑绘暟鎹尯鍩熸梺杈...
绛旓細1. 浣跨敤Excel鐨"姹囨"鍔熻兘锛歛. 纭繚鎵鏈夐渶瑕佹眹鎬荤殑琛ㄦ牸浣嶄簬鍚屼竴涓伐浣滅翱涓俠. 鎸夌収甯屾湜姹囨荤殑椤哄簭鎺掑垪宸ヤ綔琛(渚嬪锛岃〃鏍1銆佽〃鏍2銆佽〃鏍3绛)銆俢. 鍦姹囨昏〃鏍间腑锛岄夋嫨鎮ㄥ笇鏈涙斁缃眹鎬绘暟鎹殑鍗曞厓鏍笺俤. 杞埌"鏁版嵁"閫夐」鍗★紝鐒跺悗鍗曞嚮"姹囨"鎸夐挳銆俥. 鍦"姹囨"瀵硅瘽妗嗕腑锛岄夋嫨"琛ㄦ牸1"浣滀负婧愭暟鎹紝閫夋嫨...
绛旓細瑕佸皢澶氫釜Excel琛ㄦ牸涓殑鏁版嵁姹囬泦鍒颁竴涓〃鏍间腑锛屼綘鍙互浣跨敤浠ヤ笅鏂规硶锛1. 澶嶅埗绮樿创锛氳繖鏄渶绠鍗曠殑鏂规硶銆傛墦寮涓涓洰鏍嘐xcel宸ヤ綔绨匡紝鐒跺悗閫愪釜鎵撳紑鍏朵粬瑕佹眹闆嗘暟鎹殑Excel鏂囦欢銆傚湪婧愬伐浣滅翱涓夋嫨鏁版嵁鑼冨洿锛堜緥濡傦紝閫変腑鏁翠釜宸ヤ綔琛ㄦ垨鐗瑰畾鏁版嵁鍖哄煙锛夛紝鐒跺悗澶嶅埗锛圕trl + C锛夛紝鍒囨崲鍒扮洰鏍囧伐浣滅翱锛岄夋嫨瑕佺矘璐寸殑浣嶇疆锛岀劧鍚...
绛旓細濡備綍灏嗗涓猠xcel鏂囦欢鐨勬暟鎹姹囨鍒颁竴涓〃鏍兼枃浠堕噷?1銆侀鍏堟垜浠墦寮闇瑕佹眹鎬荤殑excel琛ㄦ牸锛屽湪琛ㄦ牸鐨勪笅闈紝閲嶅懡鍚嶄竴涓〃鏍硷紝鎴戜滑鏆備笖鍛藉悕涓衡滄眹鎬烩濄傜劧鍚庢垜浠偣鍑绘墦寮鏁版嵁涓殑鈥滃悎骞惰绠椻濋夐」銆傜劧鍚庢垜浠湪寮瑰嚭鏉ョ殑绐楀彛涓殑鐐瑰嚮寮曠敤浣嶇疆鍚庨潰鐨勫浘鏍囥2銆佸鏋滄槸鐩稿悓鏍煎紡鐨Excel琛ㄦ牸锛屽彲浠ュ埄鐢╒BA蹇熷皢鍑犱釜宸ヤ綔琛...
绛旓細1) 閫夋嫨瑕姹囨鐨澶氫釜琛ㄦ牸锛屽苟灏瀹冧滑鍚堝苟鍒颁竴涓宸ヤ綔琛ㄤ腑銆2) 鍦ㄥ悎骞跺悗鐨勫伐浣滆〃涓婏紝閫変腑鏁版嵁鍖哄煙锛岀劧鍚庣偣鍑"鎻掑叆"閫夐」鍗′腑鐨"鏁版嵁閫忚琛"鎸夐挳銆3) 鍦"鍒涘缓鏁版嵁閫忚琛"瀵硅瘽妗嗕腑锛岄夋嫨鍚堝苟鍚庣殑鏁版嵁鍖哄煙锛岀劧鍚庢寚瀹氶傚綋鐨勮銆佸垪鍜屽煎瓧娈点4) 鐐瑰嚮"纭畾"鎸夐挳锛岀郴缁熷皢鑷姩鐢熸垚鏁版嵁閫忚琛紝骞跺皢鍏舵斁缃湪鏂...
