excel - 如何从包装的文本单元格中提取特定的文本行？

Question

有没有可能只取换行文本单元格的前两行 通过VBA代码？

例如，一个换行的文本单元格的值为:

aaaaaaa

bbbbbbb

ccccccc

ddddddd

所以单元格包含 4 行换行的文本。我需要提取

"aaaaaaaa

bbbbbbbb"

Answer 1

使用 A1 中的文本，您可以尝试使用此公式提取前两行:

 =LEFT(A1,FIND(CHAR(10),A1,FIND(CHAR(10),A1)+2))

您可以使用 =SUBSTITUTE(...,CHAR(10)," ")用空格替换换行符。

如果你想使用 VBA，你可以使用:

 split(cells(1,1),chr(10))(0) & " " & split(cells(1,1),chr(10))(1)