哈嘍，大家好呀！

之前有一期推文，我們給大家介紹了如何拆分工作表。

當(dāng)時(shí)就有許多小伙伴在后臺(tái)留言：反向應(yīng)該如何操作？即100個(gè)工作簿，我們應(yīng)該如何合并呢？

今天就來(lái)用PQ來(lái)給大家演示一下！還沒(méi)有加群的伙伴，可以掃碼加群交流。

講之前，先回答大家講幾個(gè)你們最感興趣的問(wèn)題：

1.Power Query合并文件夾時(shí)，表頭不一樣就不行了嗎？

NoNoNo！

2.用Power Query合并時(shí)一定要做那么多步，鼠標(biāo)來(lái)回找按鈕點(diǎn)那么多次嘛？

NoNoNo！

一段代碼，不用緊張，直接復(fù)制粘貼即可。

   源 = Folder.Files('C:\Users\windows\Desktop\模擬銷(xiāo)售數(shù)據(jù)'),   

    已添加自定義 = Table.AddColumn(替換的值, '自定義', each Excel.Workbook([Content],true)),       刪除的其他列 = Table.SelectColumns(已添加自定義,{'Name', '自定義'}),   

   字段 = List.Distinct( List.Combine(List.Transform(展開(kāi)的自定義[Data],each    Table.ColumnNames(_)))),  

in   

上面的代碼怎么用呢？

下面，就用它來(lái)合并文件夾里的一百?gòu)埞ぷ鞑?，每一張工作簿中?2張表：

第一步：用Pq建立“空查詢(xún)”

首先進(jìn)入Power Query（后面統(tǒng)一用簡(jiǎn)稱(chēng)Pq）建立一個(gè)空查詢(xún)?！皵?shù)據(jù)”→“獲取數(shù)據(jù)”→“啟動(dòng)Power Query編輯器”；然后在左邊空白區(qū)域“右鍵”→“新建查詢(xún)”→“其他源”→“空查詢(xún)”。

第二步：使用Pq編輯器

復(fù)制上面那段M語(yǔ)言，粘貼到Pq中的高級(jí)編輯器。學(xué)習(xí)過(guò)Vba的都知道，Vba有Vba編輯器，大家的Pq當(dāng)然也有它的編輯器啦。點(diǎn)“主頁(yè)”→“高級(jí)編輯器”就到了大家粘貼M語(yǔ)言的地方了。

刪除里面已有的代碼，粘貼上述給大家分享的代碼。

注意：

這部分粘貼的代碼，幾乎都不用改動(dòng)哦，只需要將下面紅框的語(yǔ)句修改一下就行，換成大家自己需要合并的文件夾地址就可以了。

補(bǔ)充：

關(guān)于文件夾地址，大家可以右鍵文件夾查看屬性得知。如下圖。

粘貼好后，直接點(diǎn)“完成”，所有的表格就全部合并啦，效果圖如下：

第三步：編輯器收尾工作

做完上面之后，表格就全部合并成功了，下面我們“關(guān)閉并上載”到工作表就可以啦。

補(bǔ)充注意：

此合并工作薄可實(shí)現(xiàn)實(shí)時(shí)更新！

以后，文件夾里添加新的表格，或有對(duì)數(shù)據(jù)改動(dòng)，大家只需右鍵刷新即可。

以上，便是今天的所有內(nèi)容啦！

你學(xué)會(huì)了嗎？