文字列：定数（改行・タブ）

Sub Sample_Const() Dim str As String 'Chr(13) キャリッジリターン文字。 str = "キャリッジリターン文字" & vbCr 'Chr(10) ラインフィード文字。 str = str & "ラインフィード文字" & vbLf 'Chr(13)+Chr(10) キャリッジリターンとラインフィードの組み合わせ。 str = str & "キャリッジリターンとラインフィード" & vbCrLf 'Chr(13)+Chr(10) または Chr(10) プラットフォームで指定した改行文字。 str = str & "プラットフォームで指定した改行文字" & vbNewLine 'Chr(9) タブ文字 (横)。 str = str & "これが" & vbTab & "タブ文字 (横)です。" & vbNewLine MsgBox str End S