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 プロパティ指定したセル範囲のサイズ（行数や列数）を変更します。 …

: RGB 値一覧表（XlRgbColor 列挙型）

RGB 値（XlRgbColor 列挙型）一覧表 RGB 関数を使用して、出力さ …

: フォント名（Name,ThemeFont,StandardFont）

フォント名を取得・設定する（Name プロパティ） Name プロパティは、オブ …

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

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

: Math 関数（ Abs,Atn,Cos,Exp,Log,Rnd,Sgn,Sin,Sqr,Tan ）

Abs 関数【書式】 value = Abs ( number ) 【引数・戻 …

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

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

: 対象のオブジェクトをクリアする（Clear メソッド）

Clear メソッド対象となるオブジェクト全体をクリアします。Range オブ …

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

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

: 配列の要素数を取得する（UBound 関数・LBound 関数）

UBound 関数・LBound 関数【書式】 result = UBound …

: Split 関数（文字列型の一次配列を作成）

Split 関数の使い方【書式】 myArray = Split ( expr …

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