Vba を使用してタブ文字を指定する方法 (例あり)
VBA を使用してタブ文字を指定するには、次の 2 つの方法があります。
- vbタブ
- chr(9)
これら 2 つの定数は、VBA のタブ文字を表します。
次の例は、これらの各定数を実際に使用する方法を示しています。
例: VBA を使用してタブ文字を指定する方法
Excel に次のような姓名リストがあるとします。
VBA を使用して、これらの姓名をそれぞれタブで区切って表示するメッセージ ボックスを作成するとします。
これを行うには、次のマクロを作成できます。
SubUseTab ()
Dim i As Integer
Dim AllNames As String
For i = 2 To 11
AllNames = AllNames & Range("A" & i).Value & vbTab & Range("B" & i).Value & vbNewLine
Next i
MsgBox AllNames
End Sub
このマクロを実行すると、出力として次のメッセージ ボックスが表示されます。
vbTabを使用して、各行の姓と名をタブで連結していることに注意してください。
次に、 vbNewLine定数を使用して、メッセージ ボックスの新しい行に新しい名前をそれぞれ追加しました。
必要に応じて、 chr(9)を使用してタブ文字も指定することもできます。
SubUseTab ()
Dim i As Integer
Dim AllNames As String
For i = 2 To 11
AllNames = AllNames & Range("A" & i).Value & chr(9) & Range("B" & i).Value & vbNewLine
Next i
MsgBox AllNames
End Sub
このマクロを実行すると、出力として次のメッセージ ボックスが表示されます。
vbTabとchr(9)はどちらも同じ結果を生成することに注意してください。
追加リソース
次のチュートリアルでは、VBA で他の一般的なタスクを実行する方法について説明します。
VBAで文字列をintに変換する方法
VBAで文字列をdoubleに変換する方法
VBAで文字列に別の文字列が含まれているかどうかを確認する方法