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

関連記事

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

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

: オートシェイプの種類を表す定数（MsoAutoShapeType 列挙型）

MsoAutoShapeType 列挙型オートシェイプオブジェクトの図形の種類 …

: XlThemeColor 列挙型

XlThemeColor 列挙定数値内容 xlThemeColorDark …

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

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

: 引数が省略されたかどうかをチェックする（ IsMissing 関数）

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

: Erase ステートメント（配列の初期化・動的配列のメモリ解放）

Erase ステートメントの使い方【書式】 Erase myArray [, …

: 文字列：文字列変数内の一部を置き換える（Mid・MidB ステートメント）

Mid・MidB ステートメントの使い方【書式】 { Mid | MidB } …

: 日付時刻：現在の日付・時刻を取得・設定（Now、Date、Time）

現在の日付・時刻を取得・設定現在の日付・時刻を取得（Now 関数、Date 関 …

: xlFileFormat 列挙型

xlFileFormat 列挙型 Workbook.SaveAs メソッドの引 …

: VBA の演算子（比較演算子）

比較演算子比較演算子による演算の結果は「真」の場合は「True」、「偽」の場合 …

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