1.原始数据表如下（名称为：数据源），需要根据B列人员姓名拆分成每个人一个工作表。

2.点击【开发工具】-【Visual Basic】或者Alt+F11的快捷键进入VBE编辑界面。

3.如下图所示插入一个新的模块。

4.如下图，粘贴下列代码在模块中：

Sub CFGZB()

    Dim myRange As Variant

    Dim myArray

    Dim titleRange As Range

    Dim title As String

    Dim columnNum As Integer

    myRange = Application.InputBox(prompt:="请选择标题行：", Type:=8)

    myArray = WorksheetFunction.Transpose(myRange)

    Set titleRange = Application.InputBox(prompt:="请选择拆分的表头，必须是第一行，且为一个单元格，如：“姓名”", Type:=8)

    title = titleRange.Value

    columnNum = titleRange.Column

    Application.ScreenUpdating = False

    Application.DisplayAlerts = False

    Dim i&, Myr&, Arr, num&

    Dim d, k

    For i = Sheets.Count To 1 Step -1

        If Sheets(i).Name <> "数据源" Then

            Sheets(i).Delete

        End If

    Next i

    Set d = CreateObject("Scripting.Dictionary")

    Myr = Worksheets("数据源").UsedRange.Rows.Count

    Arr = Worksheets("数据源").Range(Cells(2, columnNum), Cells(Myr, columnNum))

    For i = 1 To UBound(Arr)

        d(Arr(i, 1)) = ""

    Next

    k = d.keys

    For i = 0 To UBound(k)

        Set conn = CreateObject("adodb.connection")

        conn.Open "provider=microsoft.jet.oledb.4.0;extended properties=excel 8.0;data source=" & ThisWorkbook.FullName

        Sql = "select * from [数据源$] where " & title & " = '" & k(i) & "'"

        Worksheets.Add after:=Sheets(Sheets.Count)

        With ActiveSheet

            .Name = k(i)

            For num = 1 To UBound(myArray)

                .Cells(1, num) = myArray(num, 1)

            Next num

            .Range("A2").CopyFromRecordset conn.Execute(Sql)

        End With

        Sheets(1).Select

        Sheets(1).Cells.Select

        Selection.Copy

        Worksheets(Sheets.Count).Activate

        ActiveSheet.Cells.Select

        Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _

                               SkipBlanks:=False, Transpose:=False

        Application.CutCopyMode = False

    Next i

    conn.Close

    Set conn = Nothing

    Application.DisplayAlerts = True

    Application.ScreenUpdating = True

End Sub

5.如下图所示，插入一个控件按钮，并指定宏到刚才插入的模块代码。

6.点击插入的按钮控件，根据提示选择标题行和要拆分的列字段，本例选择“姓名”字段拆分，当然也可以选择C列的“名称”进行拆分，看实际需求。

7.代码运行完毕后在工作簿后面会出现很多工作表，每个工作表都是单独一个人的数据。具体如下图所示：

注意：

1）原始数据表要从第一行开始有数据，并且不能有合并单元格；

2）打开工作簿时需要开启宏，否则将无法运行代码。

（本文内容由百度知道网友茗童贡献）

美化Excel是一项看似非常常规的工作。如何让自己的“工作表”格式美观统一，层次鲜明呢？今天就和大家普及一下快速美化单元格的几个使用技巧。

一、要做出干净的表格

1、 删除表格之外单元格的内容和格式。

2、尽量少用批注。

3、应消除表格中的公式错误。

使用公式时最常见的错误值有“#p/0!”,“#NAME?“,“#N/A”等。

编制公式时可以使用IF、IFNA、IFERROR以及认真检查来消除函数名称错误值，比如=IF（ISERROR(A1/B1),0,A1/B1)、=IFERROR(A1/B1,0)。

4、隐藏或删除零值。

如果报表使用者不喜欢看到有零值，我们应根据用户至上的原则，可以点击EXCEL中的千位分隔符键，将零值删除或显示成小短横线。如下图：

二、不仅要干净，还要漂亮

要做到漂亮，不外乎合理设置表格的边框、字体、颜色、造型。

>

1、字体

（1）数据量大的话字体很重要，字体格式就非常重要了。在字体的选择上一定要考虑表格的最终用途，用途不一样风格也就不一样，例如提交给领导的一般要求风格比较严肃，各类活动用的可能会要求比较活泼。

（2）与表格内其他的字体风格相协调：一个表格内的字体风格最好可以保持一致性或可以相互协调。

（3）应考虑各字号大小，应整体和谐，不能过大，也不能过小。

（4）字体方向尽量保持一直，全部居中火或者靠右。

数字格式笔者推荐用：Arial Narrow字体，文本格式推荐用：微软雅黑或方正姚体，看起来比较规整。如下图：

2、整体色调

（1）避免表格色彩杂乱，可选用多种颜色，但尽量使用同类色；

（2）其次是颜色的平衡，平衡就是指颜色的强弱、轻重、浓淡这种关系的平衡。选定一种颜色，然后搭配此种颜色系列不同亮度的颜色（变淡或加深），这样的搭配，既可实现颜色的统一，也可体现层次感。使用搭配在一起让人感觉比较自然舒服的颜色组合，如浅绿色、鹅蛋黄等；使用对比色进行强调，对比色具有强烈的视觉差，选用表格主色调的对比色来强调重点，让人感觉特征鲜明、雷点突出，比如用红色、黄色 等。是不是左侧的配色看起来更舒服呢？

（3）最后，以明度高的色为主则亮丽，而且变得轻快，以明度低的色为主则显得比较庄重、肃穆。以暖色和纯度高的色作为整体色调则给人以火热刺激的感觉，以冷色和纯度低的色为主色调则让人感到清冷、平静。

3、造型

表格的美化除了可以简单添加边框和单元格进行美化，还可以将边框和底色相结合进行造型，以进一步美化表格，制作出与众不同的表格。如制作出3D效果图，如下：

工作时候在ERP系统中导出的数据,所有的内容都在同一列中,那怎么筛选?怎么汇总? 如何把一列中的一部分拆分成两列或多列？如何把单元格中括号前面的数据如何批量提取？小编来告诉你90%以上人都不知道的快速拆分Excel表格的神器~

选择需要拆分的列,切换到【开始】选项卡，选择【数据工具】组中的分列按钮，弹出【文本分列向导】对话框。

分隔符号：根据需要选用特征值，如Tab键、分号、逗号、空格、如果都没有就勾选其他，在后面的方框中输入相应的特征值。也可以用其中的文字作为分隔符号，需要注意的是，方框内职能填写一个字或者符号。而且使用特征值拆分后，该特征值在完成分列后随之消失。

固定宽度：数据没有明显的特征值，而且数据是连续的，可以选择固定宽度。在数据预览中用鼠标左键单击要拆分的位置，出现一条分列线。按住分列线并拖动位置，可以移动分列线位置。双击分列线可清除分列线。

以上。

希望大家在阅读之余，多加练习办公软件Office的使用，提高我们的工作效率，成为职场高效率的一员。我将在每周都进行内容更新，大家一起学习，共同进步。

第一步：插入数据透视表

1.鼠标放在数据区，插入数据透视表，如下图：

2.因为只是拆分工作表，不进行计算，所以此处“值”区域空白，如下图：

第二步：设计数据透视表

不显示分类汇总，如下图：

2.以表格形式显示数据，如下图：

3.显示报表筛选页，如下图：

4.筛选页字段为区域，如下图：

第三步：拆分完成

1.拆分成四个按地区独立显示的工作表，如下图：

2.以数据透视表拆分方式拆分的工作表显示为数据透视表格式，如果想以表格形式显示数据，可以双击数据透视表右下角单元格，如下图：

3.以表格形式显示数据，如下图：

工作中常常会遇到一些特殊情况，一个Excel工作簿中可能会有几十，或者上百个工作表。

这么多工作表存在一个Excel表中，该如何快速定位到特定的表格呢？如果能有一个工作表目录真是太方便了！

最常见的方法，要定义名称 + 长长的让人很难记住的Excel公式。制作这个目录对新手还是有点难度。

定义名称：Shname =MID(GET.WORKBOOK(1),FIND("]",GET.WORKBOOK(1))+1,99)&T(NOW())在目录表中任一单元格输入并复制以下公式=IFERROR(HYPERLINK("#'"&INDEX(Shname,ROW(A1))&"'!A1",INDEX(Shname,ROW(A1))),"")

这里分享一个非常简单的Excel目录制作方法（适合2003以上版本）

操作步骤：

1、输入公式

全选所有表，在前面添加一空列。然后在单元格A1中输入公式 =xfd1

注：这个方法的原理是输入让03版无法兼容的公式（03版没有XFD列），然后检查功能诱使Excel把所有工作表名列出来。

2、生成超链接列表

文件 - 信息 - 检查兼容性 - 复制到工作表，然后Excel会插入一个内容检查的工作表，并且在E列已自动生成带链接的工作表名称。

3、制作目录表

把带链接的工作表名称列表粘贴到“主界面”工作表中，替换掉'!A1，稍美化一下，目录效果如下：

4、制作返回主界面的链接

全选工作表 - 在任一个表的A1输入公式（会同时输入到所有表中）

=HYPERLINK("#主界面!A1","返回主界面")

注:HYPERLINK函数可以在Excel中用公式生成超链接

完工！如果以后新增了表格，手工添加校新表超链接也不麻烦，如果想完全自动，可以使用本文开头所介绍的使用宏表函数创建目录。

有时我们在处理Excel表格数据的时候，会遇到汉字和数字在一个单元格中。为了统计方便，有时要把单元格拆分成两个，如果数据少还能用剪切再粘贴的方法。如果数据多，这个方法很浪费时间，还容易出错。今天我们就来学习Excel拆分单元格的功能，轻松搞定上面的需求。

表格数据一般有两种情况，一种是如内容"我的2000" 称为固定宽度；还有一种用分隔符隔开的数据形式如"我的-2000"，我们分开讲解。

一、固定宽度的数据拆分

1、表格原始数据，汉字+数字

2、选择如下数据

3、选择菜单--数据分列

4、选择固定宽度

5、这步是重点，建立分列线：在数据预览处“的”右上方单击鼠标就可以建立箭头向上的分列线，分列线的作用是将数据拆分。备注：如要清除分列线双击分列线可以清除；如要移动分列线，按住分列线并拖动到指定位置即可。

6、列数据格式默认常规，目标区域选默认$A$1

7、当点击完成，就出现下列我们需要的汉字和数字分开的表格

二、分隔符形式的数据拆分

1、表格原始数据汉字-数字形式

2、选中如下数据

3、选择数据菜单-分列

4、选择分隔符

5、分隔符号，选其他，输入 -

6、列数据格式默认常规，目标区域默认$A$1

7、点击完成后，表格就被拆分两部分。我们发现，使用分隔符后同时实现了不是固定宽度的数据拆分

总结：Excel固定宽度拆分和带分隔符数据的拆分，我们可以根据实际情况选用，赶紧试试吧。

本百家号：时代新生分享工作、生活、技能方面的经验，愿和您一起成长。请多多收藏或关注哦！

很多用户都被excel如何拆分单元格的问题难住了，接下来，小编就为各位用户们讲解在excel中拆分单元格的具体操作方法。

excel系列软件最新版本下载

Excel表格下载器软件版本：2014 官方免费版应用工具立即查看

excel2007软件版本：免费完整版应用工具立即查看

方法一

1首先选中要拆分的单元格，然后点击开始选项卡中的合并后居中。

2这时单元格就已经拆分完毕。

方法二

右键单击要拆分的单元格，选择设置单元格格式。

在设置单元格格式窗口中去掉合并单元格前面的对钩。

这时单元格就拆分好了，两种方法都很简单。

上文就是小编讲解的在excel中拆分单元格的具体操作方法，你们都学会了吗?

excel使用技巧大全表格的拆分对很多人来说都是一件难事，大家都想到的第一个方法就是复制和粘贴，或者用代码解决，其实，EXCEL有自带功能的，可以快速的帮你实现拆分。今天就给大家介绍一下这种方法，不需要编写任何的代码，一下就学会了。

例如下面我们要把这个表格拆分成多个工作表。

要把A列的销售部门，按照部门的名称进行分表。这时候，传统的方法就是插表，再进行复制粘贴。其实，解决这个问题，我们只需要学会运用Excel自带的数据透视表功能就可以。

首先，创建一个数据透视表，选中我们有用的数据区域，接着插入数据透视表。记住除了销售部门名称外，其他都要添加行标签。

插入完之后，我们就调整格式，选中区域，在浮动选项卡——布局分分类汇总——不显示，报表布局那里在选择报个形式，在去分析选项卡里面把+/- 键进行取消。

第三步，就是最为关键的一步，进行拆分表格，在透视表工具中，按选项—显示报表筛选页—确定，那么拆分就完成。

第四部删除数据透视表格式，这个比较简单。按shift连选表格，然后根据下面的方法，复制粘贴相应的值，最后删除前2行和取消工作表就可以完成。

第二个例子，批量建设相同的表。

学了如何拆分表，现在学学如何批量新建表格，具体操作如下图：

在对Excel表格进行数据处理时，有时需要将一张表格，按某个类别进行拆分成若干个表格。今天就跟大家分享一种快速拆分表格的方法。

以下图中的表格为例，将该表格，按地区拆分成若干个表格。

以下就是拆分的详细步骤

1，生产数据透视表

具体步骤：

选中数据源表格，点击菜单“插入”中的“数据透视表”将“地区”字段，添加到筛选器中将其他所有字段，都添加到行标签中生成完数据透视表后，点击菜单 “设计” -- “表格布局” -- “以表格形式显示”

具体操作如下：

2，拆分表格

操作步骤：

选中数据透视表，点击菜单 “分析” -- “数据透视表” -- “选项” -- “显示报表筛选页”在弹出的“显示报表筛选页”对话框中，选中“地区”后，点击“确定”按钮

这样，原数据透视表，就被拆分成按地区分类的数个页面了。

具体操作如下：

3，整理表格

此时，拆分后还是数据透视表，此时需要将这些数据透视表转换成表格。

步骤：

选中所有拆分后页面复制 -- 选择性粘贴（数值） -- 删除前两行

这样表格就拆分完成了。

以上就是快速拆分Excel表格的方法。今天的分享就到这里，明天继续

在 Word 中，可以把一个单元格拆分为多个单元格甚至拆分为一个表格；而Excel拆分单元格与Word不同，在Excel中，只能把合并后的单元格拆分。拆分方法有两种，一种是用“对齐方式”中的选项拆分，另一种在“设置单元格格式”窗口中拆分。另外，一次可以只拆分一个单元格，也可以批量拆分多个单元格。除拆分单元格外，还可以拆分单元格内容，即把一个单元格中的内容拆分到多个单元格，拆分内容可以数字、数字与字母组合、汉字词组等，但分隔符必须用半角而不能用全角。以下先介绍Excel拆分单元格的两种方法，再介绍拆分单元格内容的方法，操作中所用 Excel 版本为 2016。

一、Excel拆分单元格

(一）拆分一个单元格

Excel未合并的单元格已经是最小的单元格，不能再拆分。现在，假如要把一个合并了四个单元格的单元格重新拆分为四个，方法如下：

方法一：

选中要拆分单元格，单击“开始”选项卡下的“合并后居中”下拉列表框，在弹出的选项中，选择“取消单元格合并”，则此单元格被重新拆分为四个单元格，点击“自动换行”后，效果更明显，操作过程步骤，如图1所示：

方法二：

右键要拆分的单元格，在弹出的菜单中选择“设置单元格格式”，打开该窗口，选择“对齐”选项卡，单击“合并单元格”把其前面的勾取消，单击“确定”，则选中单元格被重新拆分为四个，操作过程步骤，如图2所示：

(二）批量拆分单元格

1、选中要拆分的所有单元格，例如选中三个单元格，单击“开始”下的“合并后居中”，选择“取消单元格合并”，如图3所示：

2、则选中的三个单元格同时被重新拆分为四个，为便于看到所有文字，把它们的对齐方式都设置为“左对齐”，如图4所示：

二、Excel拆分单元格内容（把一个单元格的内容拆分到多列）

1、选中要拆分内容的单元格，例如 A1，选择“数据”选项卡，单击“数据工具”上的“分列”，打开“文本分列向导”窗口，选择“请选择最合适的文件类型”下的“分隔符”，单击“下一步”；选择“分隔号”下面的“逗号”，单击“下一步”，最后单击“完成”，则选中单元格的内容被拆分到三个处于同行的单元格；操作过程步骤，如图5所示：

2、上面拆分的是字母加数字组合成的文本，全是中文的内容也可以用此方法拆分，但有一点要注意，文字之间必须用半角标点符号（即英文标点），假如用逗号做分隔符，只用“,”不能用“，”。以下是一个拆分中文的实例：

A、同样选中要拆分的单元格（如 A2），单击“数据”选项卡下的“分列”，打开“文本分列向导”窗口，如图6所示：

B、单击“下一步”，像拆分 A1 单元格中的内容一样选择即可，拆分结果，如图7所示：

C、“单元”二字被拆分到一个单元格，而“格式，符号”却没有被拆分到两个单元格；因为“单元”后用的是半角逗号，“格式，符号”中的是全角逗号，而全角逗号Excel无法识别不能作为分隔符。