VBA に改行を追加する
例を挙げて、VBA の次の行でコードを続行する方法を紹介します。また、VBA のさまざまな方法でメッセージボックスの次の行に移動する方法も紹介します。
VBA に改行を追加する
コードを壊さずに次の行に進む方法を考えるとき、プログラミングには 2つの異なるタイプの状況があります。1つ目は、特定の行のコードがその行の画面サイズを超えた場合です。
もう 1つの方法は、メッセージボックスに何かを表示する必要があり、特定のポイントの後で行を分割したい場合です。VBA を使用して複数行でコーディングを続けたい場合は、使用できる簡単な方法を提供します。
スペースを追加し、アンダースコア(_
)を付けて、新しい行を開始する必要があります。両方の行を 1 行として処理し、エラーは発生しません。
サンプルコード:
# 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
出力:
上記の例から、メッセージボックスに変更はありません。これは、アンダースコア(_
)がコードを次の行に続けるためにのみ使用されているためです。コードは問題なく実行されました。つまり、アンダースコアは複数の行を 1 行として取っています。
VBA で改行を行うには vbNewLine
メソッドを使用する
テキストを新しい行に追加したり、メッセージボックスまたは 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 は 1 行でしか使用していません。以下に示すように、このメソッドを複数回使用して、このメソッドを使用して複数の新しい行を追加することもできます。
サンプルコード:
# 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
メソッドと同じように使用され、同じ結果が得られます。