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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 文字列：文字列を検索してその最初の文字位置を返す（InStr 関数,InStrB 関数）

InStr 関数・InStrB 関数の使い方【書式】 result = { I …

: 書式を変換（Format 関数）

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

: ユーザー定義関数：自動再計算関数の設定（Volatile メソッド）

ユーザー定義関数で、自動再計算を行うかどうかを設定するワークシート上で使用する …

: 文字に下線を設定する（Underline プロパティ）

下線を設定（Underline プロパティ） Underline プロパティは、 …

: 文字列：文字列変数内の一部を置き換える（Mid・MidB ステートメント）

Mid・MidB ステートメントの使い方【書式】 { Mid | MidB } …

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

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

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

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

: Erase ステートメント（配列の初期化・動的配列のメモリ解放）

Erase ステートメントの使い方【書式】 Erase myArray [, …

: 日付時刻：日付・時刻の間隔を取得（ DateDiff 関数）

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

: 文字列：文字列の一部を別の文字列で置換（Replace 関数）

Replace 関数の使い方【書式】 result = Replace ( s …

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