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

関連記事

: 指定したセル範囲のサイズを変更（Resize プロパティ）

Resize プロパティ指定したセル範囲のサイズ（行数や列数）を変更します。 …

: CPU に制御を移す（DoEvents 関数）

DoEvents 関数 DoEvents 関数を実行すると、CPU に制御を移し …

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

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

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

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

: 文字列：文字列右から指定文字数取得（Right 関数,RightB 関数）

Right 関数・RightB 関数の使い方【書式】 result_righ …

: 書式を変換（Format 関数）

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

: 文字列：指定した文字コードに対応する文字を返す（Chr 関数）

Chr 関数の使い方【書式】 result = Chr ( code ) 引数 …

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

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

: VBA で正規表現を使う（RegExp オブジェクトのメソッド）

RegExp オブジェクトのメソッド RegExp オブジェクトの詳細に関しては …

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

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

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