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

Join 関数（配列の要素を結合）

2017/10/30

Join 関数

1次元配列の各要素を指定した区切り文字で連結します。

【書式】

myString = Join ( SourceArray [, Delimiter ] )

引数・戻り値

object ・・・対象となる Application オブジェクトを指定します。
SourceArray ・・・結合したい文字列を含む1次元配列を指定します。
Delimiter ・・・上記配列の値（文字列）を結合する部分に使用する文字列を指定します。省略した場合は、””（空白文字）が使用されます。
myString ・・・引数 SourceArray に指定した配列の各値（文字列）を引数 Delimiter で指定した文字列で連結します。

文字列を指定した区切り文字で分割し、1次元配列を作成するには、Split 関数を使用します。

引数 SourceArray に、文字列型（String）の配列、バリアント型（Variant）の配列以外の配列を指定するとエラーが発生します。

Split 関数使用例

サンプルVBAソース

　
Sub Sample_join()

    Dim myArr(3) As String
    Dim myString As String
    
    myArr(0) = "あいうえお"
    myArr(1) = "12345"
    myArr(2) = "ABCDE"
    myArr(3) = "アイウエオ"
    
    myString = Join(myArr, vbCrLf)
    
    MsgBox myString

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

　

Sub Sample_join()

Dim myArr(3) As String

Dim myString As String

myArr(0) = "あいうえお"

myArr(1) = "12345"

myArr(2) = "ABCDE"

myArr(3) = "アイウエオ"

myString = Join(myArr, vbCrLf)

MsgBox myString

End Sub

　

実行結果

- VBA基本 excel vba, join 関数, Option Base ステートメント, Option Compare ステートメント, VBA基本, エクセル VBA

Tweet

Message コメントをキャンセル

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

関連記事

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

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

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

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

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

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

: データをクリアする（ClearContents メソッド）

ClearContents メソッド対象がセル範囲（Range オブジェクト） …

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

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

: 四捨五入・切り上げ・切り捨て・丸め（Round 関数他）

Round 関数（丸め）の使い方【書式】 value = Round ( ex …

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

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

: 配列（多次元配列・配列の次元の変更）

多次元配列【書式】　多次元配列の宣言＜静的配列（固定長配列）＞ Dim my …

: 日付時刻：文字列から日付・時刻データを取得（ DateValue 関数、TimeValue 関数）

DateValue 関数（文字列から日付データを取得）【書式】 date_va …

: 文字列：定数（改行・タブ）

改行・タブの定数これらの定数は、使用前に定義する必要はありません。コード中のど …

PREV: テキストファイル（UTF-8）を読み込み、書き出し（ADODB.Stream）
NEXT: セルのデータを区切り文字で複数のセルに分割する（TextToColumns メソッド）