使用透視表功能可以很容易拆分，把你要拆分的專案新增到行標籤，隨意新增資料區欄位，雙擊數字，就會生一個分類表格。

如果分類很多，就用這個原理寫VBA自動處理

巧用資料透視錶快速拆分工作表

關鍵步驟提示

第一步：插入資料透視表

1.滑鼠放在資料區，插入資料透視表，如下圖：

2.因為只是拆分工作表，不進行計算，所以此處“值”區域空白，如下圖：

第二步：設計資料透視表

不顯示分類彙總，如下圖：

2.以表格形式顯示資料，如下圖：

3.顯示報表篩選頁，如下圖：

4.篩選頁欄位為區域，如下圖：

第三步：拆分完成

1.拆分成四個按地區獨立顯示的工作表，如下圖：

2.以資料透視表拆分方式拆分的工作表顯示為資料透視表格式，如果想以表格形式顯示資料，可以雙擊資料透視表右下角單元格，如下圖：

3.以表格形式顯示資料，如下圖：

在進行工作表資料彙總時，所有的資料都是整合在一張表格中，如果需要對工作表進行分sheet分析時，可以使用資料透視表功能將表格進行拆分，下面介紹下具體操作。

2，在彈出的建立資料透視表介面中，選擇需要分析的資料區域以及選擇放置資料透視表的位置；

3，在右側的資料透視表字段中，將需要拆分的資料要素拖動至【篩選】，將其他欄位都拖動至【行】；

3個步驟將一個工作表拆分多表

下圖是某個電器公司的銷售資料資訊，現在要根據產品名稱拆分成多個表格，有幾個產品名稱就拆分成多少個表。

遇到這樣的問題，還有很多同學是在篩選-插入新表-複製-貼上，其實，完成這個任務只需要1分鐘。

第一步：建立資料透視表，滑鼠放在資料區域任意單元格，插入-資料透視表。給資料透視表新增相應欄位，產品名稱新增到篩選區間。

有很多方法可以實現工作表的拆分：VBA程式設計、資料透視表、Power Query、外掛等，今天給你說的這兩個方法是學習成本最低的，即使你是小白，也很輕鬆就能學會。

1、資料透視表進行拆分

如圖是產品銷量表，我們希望將此表按照銷售人員進行拆分成多個工作表，也就是說拆分之後，每個工作表中只存放一個銷售人員的銷量資料。

Step1：使用產品銷量表為源資料表建立資料透視表

然後會生成一個空的資料透視表

Step2：拖動資料透視表字段

將銷售人員欄位拖入【篩選器】區域，將其他需要的欄位全部拖入【行】區域。這裡解釋一下為什麼要這樣操作：

①我們希望按照銷售人員進行工作表拆分，那麼銷售人員就是我們的篩選項，所以必須放入篩選器中；②其他欄位，只有放入【行】區域中，才能保證和現有工作表的式樣是一致的（即一維表格形式）

生成的資料透視表是這樣的，這顯然不便於檢視，我們需要對透視表的形式進行變換。

Step3：變換資料透視表形式

滑鼠放置在資料透視表區域，切換到【設計】選項卡：

設定之後，資料透視表就變成了和普通表格一樣的形式。

Step4：拆分工作表

接下來是見證奇蹟的時刻，工作表會按照銷售人員的姓名拆分成多個工作表，而且每一個工作表的名字都命名好了。

2、使用外掛進行一鍵拆分

有很多第三方外掛也能完成工作表的拆分，最常用、功能最強大的外掛之一：方方格子就包含這樣的功能。

方方格子外掛有個模組——Excel彙總大師，它是一款用於Excel工作簿、工作表的批次提取、彙總、合計、拆分、批次重新命名的強大工具。每個功能都採用嚮導，操作簡單，功能強大。

這個外掛功能非常強大，每一個Excel使用者都值得擁有，搜尋方方格子即可進入官網下載。

將一張工作表拆分到多個工作表，這是一個很實用的技巧。

比如：薪資部門已經計算好的員工成本，怎麼按照部門拆分到各個部門？

再如：集團制定好的績效獎金，如何按照地區，拆分到各個分公司？

利用透視表按照關鍵欄位將工作表拆分到多個工作表

透視表中，有一個"顯示報表篩選頁"功能。該功能，便可直接拆分到多張工作表。

如下示例，按照部門拆分到多張工作表

首先，我們在工作表上建立透視表

設定透視表區域，主要是要將"部門"用滑鼠拖拉到"篩選"區域

選單選擇"分析"-"選項"-"顯示篩選頁"即可

完整操作動畫

再分享幾個常用透視表技巧

分組統計，分分鐘搞定日報、月報、季報，還順帶搞定圖表

多張工作表彙總，一樣輕輕鬆鬆！

案例：如圖所示，資料需要按照銷售地分成多個不同的sheet表。

方法1： 資料透視表拆分法

Step1：單擊資料區域任一單元格——【插入】——【資料透視表】，單擊確定

Step2：因為是按【銷售地】分成多個不同的表，所以把【銷售地】欄位拖到 篩選區域；其他欄位統一拖到行區域。

Step3： 調整透視表區域的佈局為常見表格樣式。

① 單擊【報表佈局】——【以表格形式顯示】；

② 單擊【報表佈局】——【重複所有標籤】；

Step4：拆分工作簿為多個工作表。經過了前期的準備，單擊資料區域任一單元格——【分析】——【選項】——【顯示報表篩選頁】，單擊確定。

可以發現多出了很多sheet表，而且表格是以“銷售地”命名的，兼職太方便了耶，工作表都不需要創新命名了。

方法2： VBA方法

① 按下【Alt+F11】開啟VBA視窗

② 插入模組，輸入程式碼

Sub 拆分工作簿為多個sheet()

Set d = CreateObject("scripting.dictionary")

With Worksheets(1)

rrow = .Cells(Rows.Count, "a").End(3).Row

For i = 2 To rrow "從第2行開始拆分

strr = .Range("B" & i).Value "拆分B列內容

If Not d.exists(strr) Then

d.Add strr, .Range("a" & i).Resize(1, 6)

Else

Set d.Item(strr) = Union(d.Item(strr), .Range("a" & i).Resize(1, 6))

End If

Next

k = d.keys

i = d.items

For a = 0 To d.Count - 1

Worksheets.Add.Name = k(a)

i(a).Copy Worksheets(k(a)).Range("a2")

Next

End With

End Sub

如下圖所示，可以發現sheet表格以銷售地名，進行了命名。

方法3： 外掛法- 方方格子

簡介：方方格子是一款非常好用的軟體，安裝後可以試用30天。30天到期後，基礎功能還可以使用，但是高階功能（比如拆分工作表等）需要繳費才可以使用。

①.按關鍵字進行拆分

如下圖，按水果名進行拆分，相同的水果名放在同一個表中。

② .按每N行拆分

一個工作簿拆分多個工作表方法有3種：

① 透視表方法

② VBA方法

各位親愛的讀者，你學會了嗎？