Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

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

2015/09/01

改行・タブの定数

これらの定数は、使用前に定義する必要はありません。コード中のどこでも、対応する値の代わりに使用することができます。

定数	値	内容
vbCr	Chr(13)	改行（キャリッジリターン文字）
vbLf	Chr(10)	改行（ラインフィード文字）
VbCrLf	Chr(13)+Chr(10)	改行（キャリッジリターンとラインフィードの組み合わせ）
vbNewLine	Chr(13)+Chr(10) または Chr(10)	改行（プラットフォームで指定した改行文字）
vbTab	Chr(9)	タブ文字（横）

改行・タブの定数を使った例

サンプルVBAソース

　
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 Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

　

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 Sub

　

実行結果

- VBA基本 VBA基本, エクセルVBA, タブ文字, 定数, 改行コード

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: フォントの設定（Font プロパティ）

フォントの設定（Font プロパティ）指定されたオブジェクトのフォント情報（F …

: 式の値に応じて多分岐を行う（Switch 関数）

Switch 関数の使い方 Switch 関数は、「式・値」を対にして指定して …

: 文字列：文字列を最後から検索してその最初の文字位置を返す（InStrRev 関数）

InStrRev 関数任意の文字列の中で、指定した文字列を最後から検索して、見 …

: 書式を変換（Format 関数）

Format 関数の使い方【書式】 result = Format ( exp …

: xlFileFormat 列挙型

xlFileFormat 列挙型 Workbook.SaveAs メソッドの引 …

: 色の設定（Color プロパティ・RGB 関数）

Color プロパティ Color プロパティは、指定したオブジェクトの色を取得 …

: 文字列：指定した数の空白（スペース）からなる文字列を返す（Space 関数）

Space 関数【書式】 result = Space ( number ) …

: 指定した値を16進数で表記した文字列に変換する（Hex 関数）

Hex 関数の使い方【書式】 result = Hex ( expressi …

: 文字列：文字列の空白を削除（Trim 関数, LTrim関数, RTrim関数）

Trim 関数・LTrim 関数・RTrim 関数の使い方【書式】＜先頭と末 …

: 変数が数値型かどうかをチェックする（ IsNumeric 関数）

IsNumeric 関数の使い方【書式】 result = IsNumeric …

PREV: 列名を取得、列番号を取得（Address プロパティ,Column プロパティ）
NEXT: 現在選択されているセルを参照（RangeSelection プロパティ）