複数セルに入力した数字をカンマを入れてつなげる

複数のセル（20個ほど）に数字が入力されてる場合、カンマを入れてひとつのセルに統合する方法を教えてください。
よろしくお願いいたします。

例）
セル内数字
011122
022111　　　→011122,022111,033111
033111
　

No.1 回答者： tag1701 回答日時： 2009/10/05 15:18

=CONCATENATE関数が入っていれば

=CONCATENATE(セル番地,",",セル番地,",",セル番地)
と２０個入れれば出来ると思います。

No.2 回答者： KURUMITO 回答日時： 2009/10/05 15:22

例えばＡ2セルからＡ２1セルに数値があるとしてＢ2セルには次の式を入力して下方にオートフィルドラッグします。

=IF(A2="","",B1&A2&IF(A3="","",","))
Ｂ列の最後の行に答えが表示されます。

No.3 回答者： 135ok 回答日時： 2009/10/05 15:35

次の２種類があります。

　　　Ａ
１　011122
２　022111
３　033111
(1)=CONCATENATE(A1,",",A2,",",A3)
(2)=A1&","&A2&","&A3
(1)は関数。(2)は＆を使った場合です。

No.4 回答者： imogasi 回答日時： 2009/10/05 15:57

セルの値の結合は

（１）＆演算子
（２）ＣＯＮＣＡＴＥＮＡＴＥ関数
（３）ＶＢＡ
などで実現する。
ーー
（１）＆などエクセルの常識。＋－*/と同列の演算子だよ。
ただし（１）はつなげる数に制限はないと思うが、（２）には引数の数に制約がある。３０個まで。この質問の場合はＯＫだが）
（３）はユーザー関数を作る。
（ＶＢＡになじみが無ければ、そういう方法もあると知ればよい）
Function ketug(a)
For Each cl In a
s = s & cl & Chr(44)
Next cl
ketug = Left(s, Len(s) - 1)
End Function
使い方は蒸気をＶＢＥの標準モジュールに貼り付け
シートのセルの式として　=ketug(B2:B10) のようにエクセル関数のように使う。
こちらはセル数の制限はない。２列以上にわたる指定では使えない。

No.5 回答者： maron--5 回答日時： 2009/10/05 17:10

>複数のセル（20個ほど）に数字が・・・

◆10個以下のセルに数字が入力されていれば、カンマを入れてひとつのセルに統合します

=SUBSTITUTE(TRIM(A1&" "&A2&" "&A3&" "&A4&" "&A5&" "&A6&" "&A7&" "&A8&" "&A9&" "&A10)," ",",")