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

関連記事

: 文字列：文字列の空白を削除（Trim 関数, LTrim関数, RTrim関数）

Trim 関数・LTrim 関数・RTrim 関数の使い方【書式】＜先頭と末 …

: 日付時刻：日付時刻データを計算（ DateAdd 関数）

DateAdd 関数（日付・時刻の値を加算・減算結果を取得）【書式】 resu …

: 日付時刻：経過時間を取得（ Timer 関数）

Timer 関数の使い方【書式】 result = Timer () 【戻り値 …

: 変数が日付型かどうかをチェックする（ IsDate 関数）

IsDate 関数の使い方【書式】 result = IsDate( expr …

: xlFileFormat 列挙型

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

: 日付時刻：日付時刻から情報取得（ DatePart 関数）

DatePart 関数（日付・時刻の値から情報を取得）【書式】 result …

: 取り消し線を設定する（Strikethrough プロパティ)

取り消し線を設定する（Strikethrough プロパティ) Striketh …

: テキストファイル（UTF-8）を読み込み、書き出し（ADODB.Stream）

Stream オブジェクト ADO（ActiveX Database Objec …

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

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

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

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

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