MsgBox, vbNewLine

Sub sample()

    'メッセージの途中で改行する
    MsgBox "１行目のメッセージ" & vbNewLine & "２行目のメッセージ"

End Sub