excel是否有快速的方式，批量将竖列转变成横列

Question

如下图：
不要跟我说选择性粘帖——转置
注意是批量！
还有注意一下第一张表格的格式

Answer 1

这个问题的确比较困难，下面这个公式可以凑合用，验证没问题。

在表2的a1输入公式：

=IF(COLUMN(A:A)>8,"",IF(COLUMN(A:A)=1,OFFSET(Sheet1!$A$1,ROW(1:1)*7-7,),IF(COLUMN(A:A)<=5,OFFSET(Sheet1!$A$1,ROW(1:1)*7-6+COLUMN(A:A),2),OFFSET(Sheet1!$A$1,ROW(1:1)*7-10+COLUMN(A:A),))))&""

公式下拉、右拉填充

我本来想做一个通项公式，不用这么多层IF，但是有点困难。

追问

因为他有的有传真，有的没传真，所以下面是有的三行，有的四行……所以，是不是很麻烦，要自己手动挑？
但是他每个公司名称下面就回空两行

追答

那就没办法。手工整理一下。
每一段数据的格式必须一致，没有的项目可以留空白。

追问

你哪个表2是在一个sheet下建立的么？还是…
新手……再次麻烦您了

追答

比如原始数据在sheet1.
直接在sheet2的a1输入上面的公式，右拉、下拉就行。

这样表1的数据都会在表2实时更新。
转换完了，如果需要断开公式，就在sheet2里，ctrl+a全选-复制，在原地选择性粘贴-数值就可以。

Answer 2

用自动填充啊

比如说公司名
A1
A8
...
下拉，第一列就出来了阿
前提是上面的data field要有规律

Answer 3

有的。
全选你要转成横列的数据，复制，然后在空白处单击右键，选择“选择性粘贴”。在出来的菜单中的“转置”前面勾选就可以了。

Answer 4

有的追问

可以说一下，怎么弄么？

Answer 5

请自己录制宏追问

你可以写个大概么？