Question

excel中，如何将一个单元格里的内容分拆成不同行

如图片显示，一个单元格里面有多个单号，为了与其他表格对数方便，需要把用分隔号隔开的不同单号分成不同的行，一定要是行，不能是列，我要把所有单号发分成一个放到A列中。如果单单一个单元格的话，那我也可以用分列，然后复制→选择性粘贴的方法处理到，但是有没有一个公式可以全部处理好的，或者快捷的办法。因为分列然后选择性粘贴的话，每次只能处理一个单元格的数据，速度还是很慢。求高手指教
都不行啊，我这个只是举例，单号不止三位数的

Answer 1

方法一：光标定位在1后，按alt+enter，依次类推，此法是换行。

方法二：也可以选中单元格后，格式——单元格，“对齐”选项栏内，右侧，方向下，选择竖向排列的文本，确定，

1.数据如下图内容一样，都在一个电子表格内。

2.首先将第一个电子表格变大，

3.选择数据，分列。

4.先选中该单元格，是单元格全被选中，如图：

5.点击数据中的分列按钮。就会弹出一个新的弹框。如图;

6.在新弹出的窗口中我们选择“固定宽度，然后点击下一步。

7.之后再新弹出的弹窗中我们就可以调整它们的间距，将它们的分列出来。然后点击完成。

8.就实现了一个单元格里的内容也可以复制粘贴了。

Answer 2

看了眼别人的公式，如果不是3位数就废了

我弄了一个公式挺麻烦的，不过可以保证不在乎你的数字到底是几位数，只要分隔符是逗号就好，一直可以

=MID(","&A$2&","&A$3&","&A$4&","&A$5&","&A$6&","&A$7&","&A$8&",",FIND("@",SUBSTITUTE(","&A$2&","&A$3&","&A$4&","&A$5&","&A$6&","&A$7&","&A$8&",",",","@",ROW()))+1,FIND("@",SUBSTITUTE(","&A$2&","&A$3&","&A$4&","&A$5&","&A$6&","&A$7&","&A$8&",",",","@",ROW()+1))-FIND("@",SUBSTITUTE(","&A$2&","&A$3&","&A$4&","&A$5&","&A$6&","&A$7&","&A$8&",",",","@",ROW()))-1)

上图看结果~：

我又做了个宏，可以适应更多的数据量，看上去也比公式更直观，易于修改

Sub aa()

Dim aaa(100) As String

ccc = "," '分割符号在这里修改

'连接所有字符

abc = Cells(2, 1).Value

For i = 3 To Range("a60000").End(xlUp).Row + 1

abc = abc & ccc & Cells(i, 1).Value

Next

b = 1

For m = 1 To Len(abc)

p = Mid(abc, m, 1)

If p <> ccc Then

aaa(b) = aaa(b) & p '分割字符

Else

Cells(b, 2).Value = aaa(b) '输出到单元格

b = b + 1

End If

Next

End Sub

Answer 3

数据-分列-分隔符号-下一步--其他-在框中输入逗号，下一步--完成，这样就可以把这一列一个单元格中的内容分开，完后复制第一列中的内容在空白处选择性粘贴-转置-依次类推就可以达到你的目的，2分钟足矣

Answer 4

选中单元格，然后右键，然后“ 设置单元格格式”然后对齐，然后自动换行就行了！

Answer 5

这要看你的原数据的单元格式的，如果单元格式是数值，或者是货币格式，在B2单元格输入公式，然后下拉：
=MID(INDIRECT("A"&INT(ROW(A4)/4)+1),CHOOSE(MOD(ROW(A4),4)+1,1,4,7,10),3)
如果原数据单元格式是文本，请在B2单元格输入公式再下拉：
=MID(INDIRECT("A"&INT(ROW(A4)/4)+1),CHOOSE(MOD(ROW(A4),4)+1,1,5,9,13),3)

追问

不行，我这个只是举例，单号不止三位数的，有邮箱吗，发表格你看看

追答

fchzw@163.com

追问

已经发过去了，求解答哈，谢了

追答

已经给你发回