Excel表格拆分,教你三個(gè)絕招

 二維碼 6
發(fā)表時(shí)間:2022-04-03 14:16

財(cái)務(wù)平時(shí)面對(duì)形形色色的Excel表,什么奇葩問(wèn)題都能遇上,比如:


1. 姓名和手機(jī)號(hào)碼都連在一個(gè)格子里,怎么分開(kāi)?

2. 怎么把一張表里按客戶拆成多個(gè)工作表?有多少客戶拆分成多少表……

3. 想把一張表分成多張單獨(dú)的表文件,除了新建復(fù)制還能怎么做?


遇到上面這類問(wèn)題,我猜你是不是還在用Ctrl C和Ctrl V?數(shù)據(jù)少則還好,要是多則上百行數(shù)據(jù),簡(jiǎn)直要復(fù)制粘貼到崩潰…


今天,學(xué)習(xí)下面三招,秒拆單元格和表格!


01

拆分單元格內(nèi)容


姓名和手機(jī)號(hào)碼連在一起,是最常見(jiàn)的一種表格形式

操作步驟:

先輸入第一個(gè)姓名,選取它和下面的空行,按Ctrl+E,一秒搞定拆分!

想合并在一起呢?先輸入一行,再按按Ctrl+E,同樣一秒完成!

為什么Ctrl+E這么智能?

因?yàn)樗?span style="color: rgb(90, 148, 86);box-sizing: border-box;">excel2013新增功能“快速填充”的快捷鍵,它可以自動(dòng)從字符中找規(guī)律,完成數(shù)據(jù)的提取或合并。



02

拆分成多個(gè)excel工作表


這里有張各地區(qū)的銷(xiāo)售總表,要求根據(jù)地區(qū)拆分成多個(gè)工作表保存,有多少地區(qū)就拆分多少?gòu)埍怼?/p>


▼原始表:

▼拆分后的表:

操作步驟:


1、生成數(shù)據(jù)透視表

選取數(shù)據(jù)區(qū)域 - 插入 - 數(shù)據(jù)透視表


2、數(shù)據(jù)透視表添加字段、調(diào)整格式

將地區(qū)添加到篩選標(biāo)簽,其他的全部添加到行標(biāo)簽,不顯示分類匯總,報(bào)表布局選“以表格樣式”


動(dòng)畫(huà)演示:



3、拆分?jǐn)?shù)據(jù)透視表

數(shù)據(jù)透視表工具 - 選項(xiàng) - 顯示報(bào)表篩選頁(yè)(excel2003版這個(gè)命令在右鍵菜單中)。點(diǎn)擊該命令后會(huì)自動(dòng)生成N個(gè)以地區(qū)這名稱的工作表

動(dòng)畫(huà)演示:


4、數(shù)據(jù)表的整理

全選拆分后的工作表,復(fù)制 - 粘貼 - 數(shù)值,最后刪除前2行。



03

拆分成多個(gè)excel文件



同樣是上述情況,怎么拆分成獨(dú)立的Excel表文件呢?那只能用VBA編寫(xiě)代碼了。


比如:把當(dāng)前excel文件中除第1個(gè)工作外的所有工作表,均保存為單獨(dú)的excel文件到3月文件夾中。

拆分演示(在拆分過(guò)程中會(huì)畫(huà)面會(huì)停幾秒,請(qǐng)耐心等待)


代碼:

Sub 拆分表格()

Dim x As Integer

Dim wb As Workbook

Application.ScreenUpdating = False

For x = 2 To 32

   Sheets(x).Copy

   Set wb = ActiveWorkbook

   With wb

    .SaveAs ThisWorkbook.Path & "/3月/" & Sheets(x).Name & ".xlsx"

    .Close True

   End With

Next x

Application.ScreenUpdating = True

End Sub


數(shù)據(jù)的拆分在實(shí)際工作很常用到,對(duì)工作效率也有很大影響,掌握一些方法可以節(jié)約很多時(shí)間。


以上就是服寶今天帶來(lái)的拆分?jǐn)?shù)據(jù)方法,希望可以幫助到大家~