excel怎么两行变成一行

但人嘛，总不能被尿憋死，更不能被Excel给难住。经过无数个深夜和咖啡因的洗礼，我算是把处理这种“成对出现”的奇葩数据的各种姿（套）势（路）都摸透了。今天就掏心窝子给你说道说道，从最笨的办法到让你在同事面前横着走的“黑科技”，总有一款适合你。

最原始的办法：复制粘贴，大力出奇迹

咱们先说最接地气的，也是最不需要动脑子的方法——手动复制粘贴。

是的，你没看错。如果你的数据量不大，也就那么几十上百行，别折腾什么函数公式了，真的。直接动手，效率可能还更高。

具体操作就像这样： 1. 在电话号码那一行（比如A2），选中单元格，Ctrl+C 复制。 2. 点到姓名那一行（A1）的旁边单元格（B1），Ctrl+V 粘贴。 3. 现在A1是姓名，B1是电话，它们终于在同一行“相会”了。 4. 然后，狠下心，把原来存电话的A2行整个删掉。 5. 重复这个过程，直到所有数据都整理完毕。

这活儿，说白了就是个体力活，没什么技术含量，但胜在直观、可靠，不容易出错。它考验的不是你的Excel技能，是你的耐心和……你的鼠标质量。干这活的时候，我通常会戴上耳机，放点节奏感强的音乐，把每一次点击都想象成对那个给你制造麻烦的系统的控诉。不过，数据量一旦上了四位数，你还用这招，那不是跟自己过不去嘛。手会抽筋的，真的。

小试牛刀：用 “&” 连接符或CONCATENATE函数

好了，告别体力劳动，我们开始上点技术。当数据量让你觉得手动操作是对生命的一种浪费时，函数就该登场了。这里的主角是 & 连接符，它就像是Excel里的强力胶水，能把不同单元格里的文本粘在一起。

假设你的姓名在A1，电话在A2；下一个姓名在A3，电话在A4，以此类推。 你想把它们合并到C列。

你可以在C1单元格里输入这个公式： =A1 & A2

回车一看，嘿，A1和A2的内容确实合并到C1了。但是问题来了，姓名和电话之间没有分隔，挤成一坨，非常难看。比如“张三138xxxxxxxx”，谁看得清啊？

所以，得稍微加工一下，加个分隔符，比如一个空格或者一个破折号： =A1 & " - " & A2

注意，那个 " - " 是在英文输入法下的双引号，中间是你想要的分隔符。这下舒服多了，“张三 - 138xxxxxxxx”。

然后呢？你选中C1，把鼠标移动到单元格右下角，那个小黑点，双击或者往下拖拽填充。你会发现一个尴尬的事情：C2的公式变成了 =A2 & A3，C3的公式变成了 =A3 & A4……这不对啊！我们想要的是C2合并A3和A4，C3合并A5和A6。

所以，纯靠拖拽是不行的。这里的核心思路是 “构造公式，筛选跑路”。

1. 我们在辅助列（比如C列）的第一行（C1）不写公式，第二行（C2）开始写。在C2输入：=A1 & " " & A2
2. 在C3不写，在C4输入：=A3 & " " & A4
3. 看到规律没？我们只需要在偶数行写公式就行了。所以，写好C2的公式后，你不能直接往下拖。你应该选中C1和C2这两个单元格，然后一起往下拖。这样Excel就会理解你的模式：一个空格，一个公式；一个空格，一个公式……
4. 拖拽完成后，你会得到一列数据，一行是合并好的，一行是空的。
5. 最后一步，选中C列，数据 -> 筛选，把所有的“空白”行筛选出来，然后一口气全部删除。

搞定！这个方法比手动快了不止十倍，几千行数据也就是一两分钟的事。 顺便提一句，CONCATENATE 函数和 & 的作用一模一样，就是写法不一样：=CONCATENATE(A1, " - ", A2)。看个人喜好，我个人更喜欢用 &，简单直接。

进阶大杀器：Power Query，一劳永逸的魔法

如果说函数是手枪，那 Power Query（简称PQ） 就是核武器。特别是当你这个合并两行的操作需要频繁、重复地进行时，或者数据源极其庞大且混乱时，PQ简直是天神下凡。

很多人一听Power Query或者“获取和转换数据”就头大，觉得那是搞BI数据分析的人才用的，其实不然。它就是个超级强大的数据清洗和重塑工具，用图形化界面操作，不用写代码，逻辑清晰了比函数还简单。

面对我们这个“两行变一行”的问题，用PQ的思路是这样的：

1. 加载数据：首先，选中你那堆乱七八糟的数据，点击菜单栏的 “数据” -> “从表格/区域”。Excel会让你创建一个表，确定就好。然后，你就进入了一个全新的界面——Power Query 编辑器。这里就是你的魔法工坊。

2. 添加索引列：这是关键一步。在PQ编辑器里，点击 “添加列” -> “索引列”。你会得到一列从0开始的序号（0, 1, 2, 3, 4, 5...）。这个索引列就是我们后面进行分组的依据。

3. 分组的“神操作”：我们需要把第0、1行分为一组，第2、3行分为一组，以此类推。怎么实现？再添加一个列。点击 “添加列” -> “自定义列”。在弹出的窗口里，给新列取个名字，比如“分组依据”，然后在公式框里输入：= Number.IntegerDivide([索引], 2) 这个 Number.IntegerDivide 函数是干嘛的呢？就是整数除法。0除以2得0，1除以2也得0（只取整数部分）；2除以2得1，3除以2也得1……看明白了吗？它完美地帮我们实现了两行一组的愿望！

4. 行列转换的魔术——透视列：现在我们有了一个“分组依据”列，里面是0, 0, 1, 1, 2, 2... 这样的数据。接下来就是见证奇迹的时刻。选中你原始的数据列（就是那个姓名、电话所在的列），然后点击菜单栏的 “转换” -> “透视列”。 在弹出的“透视列”窗口里，“值列”就选你刚刚添加的那个索引列，然后在“高级选项”里，将“聚合值函数”选为 “不要聚合”。 点击确定！ Booooom！你的数据瞬间被重塑了。原来两行的数据，现在被神奇地转换到了一行，姓名在一列，电话在另一列，整整齐齐，令人感动。

5. 收尾与加载：把多余的辅助列（比如索引列、分组依据列）删掉，整理一下列名。最后点击左上角的 “关闭并上载”。一份崭新、干净、完美的数据表就出现在你的Excel工作簿里了。

最牛的是什么？这个过程是可刷新的。下次你的源数据更新了，多了几百行，你根本不用重复上面的操作。直接在生成的结果表上右键，点击“刷新”，所有新数据就自动被处理好了。这才是真正的自动化，这才是生产力！

终极玩法：VBA，码农的浪漫

如果你觉得PQ还不够酷，或者你面对的是一些极其特殊的、PQ都难以处理的场景，那么，VBA (Visual Basic for Applications) 就是你的终极归宿。

写一段小小的宏代码，可以实现完全定制化的合并。按一个按钮，瞬间完成任务，那种掌控感无与伦比。

别怕代码，我给你个最简单的模板，你照着改改就能用。

按 Alt + F11 打开VBA编辑器，插入一个新模块，把下面的代码复制进去：

```vb Sub MergeAlternateRows() Dim i As Long Dim lastRow As Long

' 假设你的数据在A列，从第一行开始
' 计算A列的最后一行
lastRow = Cells(Rows.Count, "A").End(xlUp).Row

' 从第一行开始，每次跳两行进行循环
For i = 1 To lastRow Step 2
    ' 将下一行的内容，用一个空格连接到当前行的末尾
    ' 你可以把 " " 改成任何你想要的分隔符
    Cells(i, 1).Value = Cells(i, 1).Value & " " & Cells(i + 1, 1).Value
Next i

' 再次循环，删除所有被合并的偶数行
' 注意这里是倒序删除，防止行号错乱
For i = lastRow To 2 Step -2
    Rows(i).Delete
Next i

End Sub ```

这段代码干了两件事： - 第一部分，从上到下，把第2行的内容合并到第1行，第4行的内容合并到第3行…… - 第二部分，从下到上，把所有偶数行（也就是被合并掉的那些行）删掉。

用的时候，回到Excel界面，按 Alt + F8，找到 MergeAlternateRows 这个宏，点击“执行”。Duang的一下，世界清净了。

所以你看，解决“Excel怎么两行变成一行”这个问题，方法多种多样。从最笨的体力活，到聪明的函数，再到强大的PQ和无所不能的VBA，这其实也是一个人在数据处理道路上不断成长的缩影。没有最好的方法，只有最适合当前场景的方法。

别再对着那堆乱码一样的数据发愁了，选一把你的武器，去征服它吧。那种把一堆垃圾数据收拾得服服帖帖的快感，试过一次，就会上瘾。