有时候在使用Excel表格时，忘记切换表格时，会把数据输入到一个单元格内，但是自己又想要分开的数据怎么办？下面就来教大家如何将一个单元格内的不同内容分成多个单元格。
操作方法
准备一个已经含有数据的Excel文档，如图所示，可以看到原本想要分开的数据全部在一个单元格内，那么此时想要分开这个数据要怎么做呢？
用选取框选中需要进行修改的数据，点击最上方的“数据”。如图所示位置。
然后在右下方的功能区中找到“数据工具”一栏，选择里面的“分列”功能。
弹出如下窗口，在原始数据类型中选择“分隔符号”，点击“下一步”。
在分隔符号中勾选“空格”，可以在数据预览中看到分栏后的效果，确定无误后点击“下一步”。
这里说一下：此处的数据是用空格分隔的，使用此方法时需要根据不同的分隔符勾选不同的符号。比如你用的“.”，那么勾选结果自然就不一样。
选择一个合适的列数据格式，数据预览，核实无误后点击”完成“即可。
可以看到，最初在一个单元格里的内容已经成功分到了不同的单元格里，具体效果如图。这个分拆方法很简单，希望对大家有所帮助。
excel如何将一个单元格内容拆分成多个单元格
怎样把一个单元格内容拆分到多个单元格，这篇文章讲的明明白白
本文内容是讲Excel工作表中的分列操作方法，也就是把一个单元格拆分为多个单元格的方法。
其实，菜单栏中有一个快速功能，在"数据"-"分列"中可以找到。
本文介绍如何使用代码实现分列操作。
首先认识一下Parse方法，此方法在Range对象下使用。
语法：
expression.Parse ( ParseLine_，Destination_)
如：
Range("A1").Parse "[xx] [xxx]"，Range("B1")
如上代码即实现把A1单元格内容拆分后添加到两个单元中，以B1为开始和C1中添加内容，内容分别为B1前两个字符，C1为第4、5、6字符，第3个字符丢掉不用，如果希望使用，那就把中间的空格去掉，即"[xx][xxx]"，这就可以实现分列结果。
具体方法如下图所示：
下面是我们做了一个示例，把电话号码的区号和主叫号分别拆分到后面的单元格中。
很显然，中间有一个"-"号，并不需要这个，所以以空格代替vba.space(1)，也就是第5个字符。
代码：
Private Sub 拆分电话号码()Dim xR As Range, R As RangeSet xR = Range("B3:B20")For Each R In xR If Not VBA.Len(VBA.Trim(R.Value)) = 0 Then R.Parse "[xxxx]" & VBA.Space(1) & "[xxxxxxxx]", R.Offset(0, 2) R.Offset(0, 2).NumberFormat = "0000" End IfNext REnd Sub
同理，如果要折分更多有意义的内容，根据其数据规则进行组合不同的拆分字符，其中要包含在"[ ]"中，"X"代表一个字符，实际上可以添加任何字符来代替，一个“X”代表一个字符，" "代表不用某个字符。
END
