迹忆客 专注技术分享

我们将通过示例介绍如何在 VBA 的下一行中继续代码。我们还将介绍如何使用 VBA 中的不同方法转到消息框中的下一行。

在 VBA 中添加新行

当我们考虑如何在不破坏代码的情况下进入下一行时，编程中有两种不同的情况。首先是当某一行中的代码超出该行的屏幕尺寸时。

另一种方法是当我们必须在消息框中显示某些内容时，我们想在某个点之后换行。如果我们想使用 VBA 保持多行编码，它提供了一种可以使用的简单方法。

我们需要添加空格，加上下划线（_），然后开始新行。它将两行作为一行，不会有任何错误。

示例代码：

# VBA
Sub test()
MsgBox "Lorem Ipsum is simply dummy text of the printing" _
         & " and typesetting industry. Lorem Ipsum has " _
         & "been the industry's standard dummy text ever since the 1500s"
End Sub

输出：

从上面的例子来看，消息框没有变化，这是因为下划线（_）只是用于将代码继续到下一行。代码执行没有任何问题，这意味着下划线已将多行视为单行。

使用 vbNewLine 方法在 VBA 中添加新行

假设我们想要将文本添加到新行或在消息框中或在我们正在显示或保存在 excel 文件中的内容中添加换行符。为此目的可以使用许多不同的方法。

使用的第一个方法是 vbNewLine，我们可以将它添加到我们想要添加中断的行中的任何位置。

示例代码：

# VBA
Sub test()
MsgBox "Lorem Ipsum is simply dummy text of the printing" & vbNewLine & " and typesetting industry. Lorem Ipsum has " & vbNewLine & "been the industry's standard dummy text ever since the 1500s"
End Sub

输出：

它按我们想要的方式显示，但我们只在一行中使用了 msgBox。我们也可以通过多次使用该方法来添加多个新行，如下所示。

示例代码：

# VBA
Sub test()
MsgBox "Lorem Ipsum is simply dummy text of the printing" & vbNewLine & " and typesetting industry. Lorem Ipsum has " & vbNewLine & "been the industry's standard dummy text ever since the 1500s"
End Sub

输出：

多次使用 vbNewLine 方法将向消息框添加多行。

使用 Chr(10) 方法在 VBA 中添加新行

让我们讨论另一种可用于实现相同目的的方法，称为 Chr(10)。我们可以像使用 vbNewLine 方法一样使用此方法。

示例代码：

# VBA
Sub test()
MsgBox "Lorem Ipsum is simply dummy text of the printing" & Chr(10) & " and typesetting industry. Lorem Ipsum has " & Chr(10) & "been the industry's standard dummy text ever since the 1500s"
End Sub

输出：

chr(10) 方法的使用方式与 vbNewLine 方法相同，结果相同。