Excel 是否使用空格将内容从单元格移动到msgbox？

我遇到了一个有趣的问题-我正在尝试编写VBA代码，该代码将获取单元格的内容并将其放入msgbox。问题是我不知道如何将回车放入这个字符串中

我的代码看起来像这样

Dim myMsg as string
myMsg = Worksheets("Data").cells(1,1)
msgBox myMsg

所以，如果单元格

A1

包含

THIS IS MY NEXT AND NOW THIS IS A NEW LINE

---

。。。我如何才能强制马车返回到那条线的中间？

我从未使用过VBA，但在线快速搜索给了我以下信息：

 "some string" & vbCrLf & "next line"

及

---

我从未使用过VBA，但通过在线快速搜索，我发现：

 "some string" & vbCrLf & "next line"

及

---

要在消息框中插入新行，请使用vbCrLF

所以，假设你想在每次有反斜杠的时候放一条新线。您可以使用：

Msgbox Replace(ActiveCell.Value, "\", vbCrLF)

要符合示例代码的范围，请使用：

Dim myMsg as string
Dim newLineCharacter as string

newLineCharacter = "\"  ' Replace with your delimiter

myMsg = Replace(Worksheets("Data").cells(1,1), newLineCharacter, vbCrLf)
msgBox myMsg

---

要在消息框中插入新行，请使用vbCrLF

所以，假设你想在每次有反斜杠的时候放一条新线。您可以使用：

Msgbox Replace(ActiveCell.Value, "\", vbCrLF)

要符合示例代码的范围，请使用：

Dim myMsg as string
Dim newLineCharacter as string

newLineCharacter = "\"  ' Replace with your delimiter

myMsg = Replace(Worksheets("Data").cells(1,1), newLineCharacter, vbCrLf)
msgBox myMsg

---

这取决于你的目标是什么。如果要在显示在消息框之前在Excel中预先格式化文本，请使用Excel中的

将行换行，然后VBA将如下所示：

MsgBox Worksheets("Data").cells(1,1).value

如果要自动换行，请编写一个函数来剪切字符串并提供长度

MsgBox WrapText(Worksheets("Data").cells(1,1).value, 20)

---

这取决于你的目标是什么。如果要在显示在消息框之前在Excel中预先格式化文本，请使用Excel中的

将行换行，然后VBA将如下所示：

MsgBox Worksheets("Data").cells(1,1).value

如果要自动换行，请编写一个函数来剪切字符串并提供长度

MsgBox WrapText(Worksheets("Data").cells(1,1).value, 20)