无需使用VBA，能否在Excel中替换连续双换行符为单换行符？

当然可以用Excel内置函数实现，下面给你两种实用方法：

方法1：SUBSTITUTE函数（全版本通用） #

Excel里单元格内的换行符对应CHAR(10)，直接用SUBSTITUTE替换连续两个换行符为单个即可：

=SUBSTITUTE(A1, CHAR(10)&CHAR(10), CHAR(10))

如果单元格存在3个及以上连续换行，可以嵌套一次SUBSTITUTE来彻底处理：

=SUBSTITUTE(SUBSTITUTE(A1, CHAR(10)&CHAR(10), CHAR(10)), CHAR(10)&CHAR(10), CHAR(10))

原理是第一次把所有连续两个的换成单个，剩下的可能还有连续两个（比如原先是三个换行，第一次替换后变成两个），第二次替换就能把剩余的连续换行也处理成单个。

方法2：TEXTSPLIT+TEXTJOIN（Excel 365/2021及以上版本适用） #

如果你的Excel版本支持动态数组函数，这个方法更简洁，能一次性处理任意数量的连续换行：

=TEXTJOIN(CHAR(10), TRUE, TEXTSPLIT(A1, CHAR(10), , TRUE))

• TEXTSPLIT(A1, CHAR(10), , TRUE)：把单元格文本按换行符拆分，最后一个参数TRUE表示过滤掉拆分后产生的空内容（也就是连续换行导致的空项）
• TEXTJOIN(CHAR(10), TRUE, ...)：把拆分后非空的内容用单个换行符重新连接起来

这两种方法都不需要启用宏，比VBA更适合不需要代码的场景。

内容的提问来源于stack exchange，提问作者Joan Lara