如何在vba代码中添加新行？

在 VBA 中，有三个不同的（常量）用于添加换行符。

vb换行符

vbNewLine 插入一个换行符，该换行符进入换行符。在下面的代码行中，您使用此组合了两个字符串。

 Range("A1") = "Line1" & vbNewLine & "Line2"

当您运行此宏时，它会返回两行字符串。

它返回字符 13 和 10 (Chr(13) + Chr(10))。您还可以按以下方式使用代码来达到相同的结果。

 Range("A1") = "Line1" & Chr(13) & Chr(10) & "Line2"

但是当您使用 vbNewLine 时，您不需要使用 CHAR 函数。

常数vbCrLf代表回车换行，这意味着Cr将光标移动到行首，Lf将光标移动到下一行。

当您在两个字符串或值中使用 vbCrLf 时（如以下代码所示），它会插入换行符。

 Range("A1") = "Line1" & vbCrLf & "Line2"

vbLf 常量代表换行符，当您在两个字符串中使用它时，它会返回一个换行符，为第二个字符串添加新行。

 Range("A1") = "Line1" & vbLf & "Line2"

如果您想在使用VBA MsgBox 时添加新行，可以使用我们讨论过的上述三个常量中的任何一个。

 MsgBox "Line1" & vbNewLine & "Line2" MsgBox "Line1" & vbCrLf & "Line2" MsgBox "Line1" & vbLf & "Line2"

还有一个返回回车符的 vbCr 常量，您可以使用它在消息框中插入新行。

 MsgBox "Line1" & vbCr & "Line2"

如果您想输入单元格值，则在对其应用换行文本之前，vbCr 将不起作用。