vba - 如何获取单元格内容，包括单元格内的换行符？

Question

我正在尝试使用“.Value”函数获取内部有换行符的单元格的字符串值。

引用下面的单元格 B6 和 B7:



我正在使用的语法:

Dim foo as String
foo = Range("B6").Value

B6 和 B7 都作为单行字符串返回，例如“亲爱的匿名者，请授予...”，而我需要包含换行符在内的实际值。

有没有一种直接的方法来完成我所需要的？

提前致谢!

编辑:

我实际上是将字符串构建为 html 内容，以便可以通过电子邮件发送。有了这个，我猜我需要检查单元格是否有换行符并将每个换行符替换为html标签“ < br > ” - 无需实际替换单元格内容。

例如我需要从单元格 B6 中获取的值转换为以下内容:
<br>"Dear Anon,< br >< br >Kindly grant the corre....."
希望你能帮忙。。

Answer 1

如果您需要实际值，包括换行符，请使用您当前拥有的代码，即

Dim foo as String
foo = Range("B6").Value

如果包含 MsgBox foo 之类的语句, 或 Debug.Print foo ，在这些语句之后，您将看到字符串中包含换行符。

根据您更新的问题，尝试使用

Dim foo As String
foo = Replace(Range("B6").Value, vbLf, "<br>")

这将删除换行符并插入字符串 "<br>"进入他们的位置。