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

関連記事

: 日付時刻：年・月・日を取得（Year、Month、Day 関数）

日付から年・月・日を取得する関数【書式】 date_year = Year ( …

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

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

: ユーザー定義関数：セルを取得する（ThisCell プロパティ）

入力されたセルを取得するワークシート上で使用する Function プロシージ …

: ショートカットメニュー（CommandBar オブジェクト）

ショートカットメニュー（コンテキストメニュー）右クリックで表示されるメニューの …

: 日付時刻：時・分・秒を取得（Hour、Minute、Second 関数）

日付時刻から時・分・秒を取得する関数【書式】 time_hour = Hour …

: ユーザー定義定数（Const ステートメント）

定数を使うユーザー定義の定数を使用するには、Const ステートメントを使って …

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

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

: セルのデータを区切り文字で複数のセルに分割する（TextToColumns メソッド）

TextToColumns メソッド TextToColumns メソッドを使用 …

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

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

: 文字列：指定した文字の文字コードを取得する（Asc 関数）

Asc 関数【書式】 result = Asc ( string ) 引数・戻 …

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