我需要在Excel中删除单元格内的空白行
我必须清楚，我不想删除所有换行符 – 我只想删除空白行。 例如：
*人行道的尽头在街道开始之前，那里的草生长得柔软而洁白，
那里的太阳燃烧着绯红色的光芒，那里的月亮鸟从他的飞行中rest
在薄荷风中冷却。*
想象一下上面所有的文字都在一个单元格中。 我只想删除这两个空行。 谁能帮忙？
VBA解决scheme：
Sub DoubleReturn() Range("A1").Select Selection.Replace What:="" & Chr(10) & "" & Chr(10) & "", Replacement:="" & Chr(10) & "" End Sub
非VBA解决scheme：
在您的查找框中：两次回车ALT + 0010（两次）。
在您的replace框中：ALT + 0010（一次）
Orbling，Excel有一些正则expression式的支持，你只需要一些疯狂的VBA来使用它。 我testing了这一点，它似乎工作。
只要把它放在一个模块中，你应该可以使用单元格公式如=ClearLineBreaks(A1) 。
Function ClearLineBreaks(txt As String) Application.Volatile With CreateObject("VBScript.RegExp") .Pattern = "(\r|\n) ?" .Global = True ClearLineBreaks = Trim(.Replace(txt, " ")) End With End Function