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

VBA の演算子（文字連結演算子：& 演算子 + 演算子）

2015/04/15 2015/04/16

文字連結演算子

文字連結演算子は、文字列の連結を行うときに使用する演算子で、「&」または「+」を使用します。

& 演算子の使い方

【書式】

result = exp1 & exp2

引数・戻り値の説明

exp1,exp2 ・・・任意の式を指定します。
result ・・・任意の文字列型 (String) またはバリアント型 (Variant) の変数を指定します。

exp1、exp2 の両方が文字列型の場合、演算結果 result は文字列型になります。
exp1、exp2 の両方または一方が文字列型以外の場合（Null 値を除く）は、バリアント型（内部処理形式が文字列型）になります。
exp1、exp2 の両方が、Null 値の場合、演算結果 result も Null 値になります。
exp1、exp2 のいずれかが、Null 値の場合、演算結果 result は、Null 値でないもう一方の値となります。
また、exp1、exp2 が、Empty 値を持つ式の場合、長さ 0 の文字列として扱われます。

+ 演算子

【書式】

result = exp1 + exp2

項目の説明

exp1、exp2 ・・・任意の式を指定します
result ・・・任意の数値変数を指定します。

+ 演算子を使用した場合、加算と文字列連結のどちらが行われるのかが分かりにくい場合があるので注意してください。

VBA 論理演算子の使用例

サンプルVBAソース

　
Sub Sample_OperatorAnd()

    Dim numi As Integer
    Dim numd As Double
    Dim str1 As String
    Dim str2 As String
    Dim var, n
    
    numi = 120: numd = 22.5:
    str1 = "Hello!": str2 = "Thank you."
    n = Null
    
    
    Debug.Print numi & numd & str1 & str2 & var & n             '12022.5Hello!Thank you.
    
    Debug.Print TypeName(numi & numd & str1 & str2 & var & n)   'String

    Debug.Print numi & numd                                     '12022.5

    Debug.Print numi + numd                                     '142.5
    
    Debug.Print str1 + str2                                     'Hello!Thank you.
    
    Debug.Print str2 + var                                      'Thank you.
    
    Debug.Print str1 + numi                                     'エラー
    

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

27

28

29

30

31

　

Sub Sample_OperatorAnd()

Dim numi As Integer

Dim numd As Double

Dim str1 As String

Dim str2 As String

Dim var, n

numi = 120: numd = 22.5:

str1 = "Hello!": str2 = "Thank you."

n = Null

Debug.Print numi & numd & str1 & str2 & var & n '12022.5Hello!Thank you.

Debug.Print TypeName(numi & numd & str1 & str2 & var & n) 'String

Debug.Print numi & numd '12022.5

Debug.Print numi + numd '142.5

Debug.Print str1 + str2 'Hello!Thank you.

Debug.Print str2 + var 'Thank you.

Debug.Print str1 + numi 'エラー

End Sub

　

実行結果

- VBA基本 & 演算子, VBAの演算子, VBA基本, エクセルVBA, 文字連結演算子

Tweet

Message コメントをキャンセル

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

関連記事

: IME の現在の状態を取得します（IMEStatus 関数）

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

: VBA の演算子（論理演算子：And、Eqv、Imp、Not、Or、Xor）

論理演算子論理演算を行うときに使用する演算子で、以下の 6 種類があります。 …

: 文字列：文字列の長さを取得（ Len 関数、LenB 関数）

Len 関数（文字列の長さを取得）【書式】 result_len = Len …

: VBA で正規表現を使う（RegExp オブジェクトのプロパティ）

RegExp オブジェクトのプロパティ RegExp オブジェクトの詳細に関して …

: 引数の整数部分を取得する（Fix 関数・Int 関数）

Fix 関数・Int 関数の使い方【書式】 number_fix = Fix …

: 変数が日付型かどうかをチェックする（ IsDate 関数）

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

: XlThemeColor 列挙型

XlThemeColor 列挙定数値内容 xlThemeColorDark …

: VBA で正規表現を使う（RegExp オブジェクト）

RegExp オブジェクト VBA で正規表現を使うには、VBScript のR …

: 色の設定（ThemeColor プロパティ・TintAndShade プロパティ）

ThemeColor プロパティ・TintAndShade プロパティテーマカ …

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

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

PREV: VBA の演算子（論理演算子：And、Eqv、Imp、Not、Or、Xor）
NEXT: VBA の演算子（演算子の優先順位）