VBA/配列要素を結合する・Join関数
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
]
開始行:
#navi(../)
* VBAで配列要素を結合する・Join関数 [#k045925b]
VBAでのJoin関数のサンプルコードと実行結果を紹介します。~
PHPのimplode, Rubyのjoin, JavaScriptのjoinに該当します。
#contents
#htmlinsert(office_ads_top.html)
* 動作実行環境 [#qdd2798a]
-Windows 10 22H2
-Microsoft® Excel® for Microsoft 365 MSO (バージョン 2310...
* 関連サイト [#tbef3fc0]
-[[Microsoft Learn: Join 関数 (Visual Basic for Applicati...
* Join関数の構文 [#je50ef71]
以下の構文は、-[[Join 関数 (Visual Basic for Applications...
-構文~
Join(sourcearray, [ 区切り記号 ])
#br
Join 関数の構文には、次の名前付き引数があります。
#br
|~パーツ|~説明|
|sourcearray|必須。&br;結合するサブ文字列を含む 1 次元配...
|delimiter|省略可能。&br;返される文字列内のサブ文字列の区...
* サンプルコードと実行結果 [#fde76760]
Join関数を使ったVBAサンプルコードと実行結果を以下に記しま...
** Join関数を使ったサンプルコード [#qc4dea98]
Option Explicit
Sub RunJoinSample()
Dim ary As Variant
ary = Array("I", "wish", "for", "world", "peace.")
MsgBox _
Join(ary), _
vbOKOnly, _
"Join(ary)"
MsgBox _
Join(ary, ""), _
vbOKOnly, _
"Join(ary, """")"
MsgBox _
Join(ary, ","), _
vbOKOnly, _
"Join(ary, "","")"
End Sub
** 実行結果 [#vd9e0a08]
上記サンプルコードの実行結果です。
- delimiter なしのため、デフォルトの" "空白文字となります。
#br
#ref(01.png)
#br
- delimiter "" のため、配列内の文字列がそのまま結合されま...
#br
#ref(02.png)
#br
- delimiter "," のため、,で区切られ結合されます。
#br
#ref(03.png)
#br
以上、VBAでJoin関数を使ったサンプルコードの紹介でした。
#htmlinsert(office_ads_btm.html)
終了行:
#navi(../)
* VBAで配列要素を結合する・Join関数 [#k045925b]
VBAでのJoin関数のサンプルコードと実行結果を紹介します。~
PHPのimplode, Rubyのjoin, JavaScriptのjoinに該当します。
#contents
#htmlinsert(office_ads_top.html)
* 動作実行環境 [#qdd2798a]
-Windows 10 22H2
-Microsoft® Excel® for Microsoft 365 MSO (バージョン 2310...
* 関連サイト [#tbef3fc0]
-[[Microsoft Learn: Join 関数 (Visual Basic for Applicati...
* Join関数の構文 [#je50ef71]
以下の構文は、-[[Join 関数 (Visual Basic for Applications...
-構文~
Join(sourcearray, [ 区切り記号 ])
#br
Join 関数の構文には、次の名前付き引数があります。
#br
|~パーツ|~説明|
|sourcearray|必須。&br;結合するサブ文字列を含む 1 次元配...
|delimiter|省略可能。&br;返される文字列内のサブ文字列の区...
* サンプルコードと実行結果 [#fde76760]
Join関数を使ったVBAサンプルコードと実行結果を以下に記しま...
** Join関数を使ったサンプルコード [#qc4dea98]
Option Explicit
Sub RunJoinSample()
Dim ary As Variant
ary = Array("I", "wish", "for", "world", "peace.")
MsgBox _
Join(ary), _
vbOKOnly, _
"Join(ary)"
MsgBox _
Join(ary, ""), _
vbOKOnly, _
"Join(ary, """")"
MsgBox _
Join(ary, ","), _
vbOKOnly, _
"Join(ary, "","")"
End Sub
** 実行結果 [#vd9e0a08]
上記サンプルコードの実行結果です。
- delimiter なしのため、デフォルトの" "空白文字となります。
#br
#ref(01.png)
#br
- delimiter "" のため、配列内の文字列がそのまま結合されま...
#br
#ref(02.png)
#br
- delimiter "," のため、,で区切られ結合されます。
#br
#ref(03.png)
#br
以上、VBAでJoin関数を使ったサンプルコードの紹介でした。
#htmlinsert(office_ads_btm.html)
ページ名:
![[PukiWiki]](image/logo.png "[PukiWiki]"){kind=logo}
