OfficeType

VBA~文字をつなげて入力しよう~Excel

セルの文字列とセルの文字列を結合

セルA1の文字列とセルB1の文字列を結合してセルC1に表示する場合は次のように書きます。

Sub test1()
Range("C1") = Range("A1") & Range("B1")
End Sub

下の画像の例ではセルA1の文字列"織田"とセルB1の文字列"信長"が結合した"織田信長"がセルC1に表示されます。結合したいセルとセルの間に&(アンパーサンド)を入れます。

image-01

image-02

セルの文字列と任意の文字列の結合

セルA1の文字列と任意の文字列を結合してセルC1に表示したい時は次のように書きます。

Sub test2()
Range("C1") = Range("A1") & "信長"
End Sub

下の画像の例ではセルA1の文字列"織田"と任意の文字列"信長"が結合した"織田信長"がセルC1に表示されます。任意の文字列を結合したい場合は"(ダブルクォーテーション)の間に文字列を入力します。

image-03

image-04

文字列と文字列を改行して表示したい場合

文字列と文字列を改行して表示したい場合はvbCrLfを使います。次のコードを実行すると"織田"と"信長"が改行されてメッセージボックスに表示されます。

Sub test3()
MsgBox "織田" & vbCrLf & "信長"
End Sub

image-05