Excel 「、」で区切って1つのセルに

質問

Ａ列　　Ｂ列　　Ｃ列　　Ｄ列　　Ｅ列
あああ　いいい　ううう　えええ　おおお

Ａ列
あああ、いいい、ううう、えええ、おおお

別々のセルに入っているのを一つのセルに「、」で区切って入れたいです。
入れるのはどのセルでもいいです。
よろしくお願いします。

回答No.4

Chiquilin · ベストアンサー

> 書き忘れたのが悪いのですがこれだと量があると大変ですね。
量が多いと書いてたらそもそも こんな方法で回答してません。

テキストエディタに持っていって Tab記号を「、」に置換した方が
早そうな気もしますが Excelでやるなら手段は２つです。

手段１：作業列に計算を分けて１つずつ繋げる。
手段２：ユーザー定義関数を作る。

前者は既に回答が付いてますので 後者で回答します。

Function UNION(セル範囲 As Range, 記号 As String)
Dim c As Range
For Each c In セル範囲
If c.Value <> vbNullString Then
UNION = UNION & 記号 & c.Value
End If
Next c
UNION = Mid$(UNION, 2)
End Function

お礼

どうもすみませんでした。

簡単にできました。
ありがとうございます。

回答No.3

msMike

１．Ａ列を選択して、マウスの右クリックから[挿入]
２．セル B2 に式 =A2&" "&B1 を入力
３．セル B3 に式 =SUBSTITUTE(TRIM(F2)," ","、") を入力
以上の結果を添付図上段に示した。
４．セル B2 を右方にズズーッとオートフィル
この結果を添付図下段に。

お礼

ありがとうございます。
これだと量があっても引っぱればいいので対応できそうです。

回答No.2

Chiquilin

全てのセルがデータで埋まっているなら「&」で繋ぐだけでいいん
でしょうけど

=SUBSTITUTE(TRIM(A1&" "&B1&" "&C1&" "&D1&" "&E1)," ","、")

お礼

ありがとうございます。
書き忘れたのが悪いのですがこれだと量があると大変ですね。

回答No.1

guess_manager

Ａ列　　Ｂ列　　Ｃ列　　Ｄ列　　Ｅ列
あああ　いいい　ううう　えええ　おおお
上記が第１行から入力されているものとして、
a2のセルに、下記の式を入れてみてください。
=A1&"、"&B1&"、"&C1&"、"&D1&"、"&E1

お礼

ありがとうございます。
書き忘れたのが悪いのですがこれだと量があると大変ですね。